reverse 读取列标值,并按相反的次序返回该列表。
@fred=6..10;
@barney=reserve(@fred); #得到@barney 10,9,8,7,6
sort 读取列表的值并进行排序
#!/usr/bin/perl -w
@a=qw/c f b a z h d/;
@b=sort(@a);
print "@b\n"; # 得到a b c d f h z
#!/usr/bin/perl -w
@a=qw/c f b a z h d/;
@b= reverse sort(@a); # 先逆序然后再排序
print "@b\n";
阅读(603) | 评论(0) | 转发(0) |