在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数值进行的。因此,最好的选择是首先将数组的每个元素转换为小写字母,然后执行排序功能。

以上是 在Perl中对数组排序 的全部内容, 来源链接: utcz.com/z/322233.html

回到顶部