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 "@bn"; # 得到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 "@bn";