Perl pop用法及代碼示例

描述

此函數返回 ARRAY 的最後一個元素，從數組中刪除該值。請注意， ARRAY 必須明確是一個數組，而不是一個列表。

如果省略 ARRAY，它會在主程序中或在 eval STRING 或 BEGIN、CHECK、INIT 或 END 塊中調用時從 @ARGV 中彈出最後一個值。否則，它會嘗試從子程序內的@_ 數組中彈出信息。它與推送相反，當結合使用時，可以實現 "stacks"。

注意申請後pop數組將被縮短一個元素。

用法

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

pop ARRAY

pop

返回值

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

示例

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

#!/usr/bin/perl -w

@a = (1, 2, 3, 4);
print("pop() ", pop(@a), "   leaves  ",@a, "\n");

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

pop() 4  leaves 123