reverse和sort 操作

#----------------------------------------------------------reverse--
# reverse（逆转）操作将输入的一串列表（可能是数组）按相反的顺序返回。
#/usr/bin/perl -w
@array=1..5;           #array=1 2 3 4 5
@b=reverse(@array);    #@b=5 4 3 2 1
@c=reverse@array;      #@c=5 4 3 2 1  
@array=reverse@array;  #将逆转过的字符串存回去
print "@array\n";      #1 2 3 4 5
#reverse @array; 错误，没有改变@array 的值
#----------------------------------------------------------sort----
#sort 操作将输入的一串列表（可能是数组）根据内部的字符顺序进行排序。
#对于ASCII 字符串，将根据ASCII 序进行排序。
#/usr/bin/perl -w
@array=qw/a A 4/;      #@array值为a A 4
@a=sort(@array);       #@a值为4 A a
@b=sort@array;         #@b值同上
@c=reverse sort @array; #@c值为a A 4
@d=sort 97..102;    ##值为100，101，102，97，98，99
#默认的排序规则下，任何由1 开头的字符串先于由9 开头的字符串
#sort @array; 错误，没有改变@array 的值