用 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 次瀏覽

啟動你的 職業

完成課程認證

開始
廣告