在Perl中对数组排序
Perl中的sort()函数根据ASCII数值标准对数组的每个元素进行排序。此函数具有以下语法-
语法
sort [ SUBROUTINE ] LIST
该函数对LIST排序并返回排序后的数组值。如果指定了SUBROUTINE，则在排序元素时将应用SUBROUTINE内部的指定逻辑。
示例
#!/usr/bin/perl # define an array @foods = qw(pizza steak chicken burgers); print "Before: @foods\n"; # sort this array @foods = sort(@foods); print "After: @foods\n";
输出结果
这将产生以下结果-
Before: pizza steak chicken burgers After: burgers chicken pizza steak
请注意，排序是根据单词的ASCII数值进行的。因此，最好的选择是首先将数组的每个元素转换为小写字母，然后执行排序功能。