perl 反转、排序控制台输入内容
时间：2009-05-29 来源：aqcjsy1
C:\Perl\bin>perl
@rev_list = reverse <>;
print "@rev_list\n";
@sort_list = sort <>;
print "@sort_list\n";
^D
xxx
yyy
zzz
aaa
^Z
aaa
zzz
yyy
xxx xxx
yyy
zzz
aaa
^Z
aaa
xxx
yyy
zzz
@rev_list = reverse <>;
print "@rev_list\n";
@sort_list = sort <>;
print "@sort_list\n";
^D
xxx
yyy
zzz
aaa
^Z
aaa
zzz
yyy
xxx xxx
yyy
zzz
aaa
^Z
aaa
xxx
yyy
zzz
相关阅读 更多 +
