Perl数组排序

Perl数组排序

数值类型数组排序使用：

sort { $a <=> $b } @array; 升序排列
sort { $b <=> $a } @array; 降序排列

字符串类型数组排序使用：

sort { $a cmp $b } @array; 升序排列
sort { $b cmp $a } @array; 降序排列

cmp比较比较的是assic码

字符串比较忽略大小写使用：

sort { lc($a) cmp lc($b) } @array;

 

使用方法：

my @new_arr = sort { $a <=> $b } @array;

排序时不会更改原来的数组，需要使用一个新的数组来接收。