このページに関してのお問い合わせはこちら
zsh入門 パート2
ツイート
260
:
This code is PDS
:
03/03/15 03:27
ついでにperl版。
誰かzsh版希望。
#!/usr/bin/perl -w
use strict;
my @lines;
while (<>) {
while (/\\\Z/) {
$_ .= <>;
}
push @lines, $_;
}
print sort(@lines);
# This code is PDS.