用 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 数字值执行的。因此，最佳选择是先将数组的每个元素转换为小写字母，然后再执行排序函数。

更新时间： 29-11-2019

658 次浏览

启动你的 职业

完成课程认证

开始
广告