Perl shift用法及代碼示例

描述

此函數返回數組中的第一個值，刪除它並將數組列表的元素向左移動一個。如果未指定 ARRAY，則在子例程中移動 @_ 數組，否則為 @ARGV。 shift 本質上與 pop 相同，隻是從數組的開頭而不是結尾獲取值。

用法

以下是此函數的簡單語法 -

shift ( [ARRAY] )

shift

返回值

如果數組為空，則此函數返回 undef，否則返回數組中的第一個元素。

示例

以下是顯示其基本用法的示例代碼 -

#!/usr/bin/perl

@array = (1..5);
while ($element = shift(@array)) {
   print("$element - ");
}
print("The End\n");

執行上述代碼時，會產生以下結果 -

1 - 2 - 3 - 4 - 5 - The End