pop

描述 (Description)

此函数返回ARRAY的最后一个元素，从数组中删除该值。 请注意，ARRAY必须显式为数组，而不是列表。

如果省略ARRAY，它会弹出主程序中@ARGV的最后一个值，或者在eval STRING或BEGIN，CHECK，INIT或END块中调用时。 否则，它会尝试在子例程中弹出@_数组中的信息。 它与push相反，当组合使用时，允许您实现“堆栈”。

请注意，应用pop ，数组将缩短一个元素。

语法 (Syntax)

以下是此函数的简单语法 -

pop ARRAY
pop

返回值 (Return Value)

如果list为空，则此函数返回undef，否则返回数组中的最后一个元素。

例子 (Example)

以下是显示其基本用法的示例代码 -

#!/usr/bin/perl -w
@a = (1, 2, 3, 4);
print("pop() ", pop(@a), "   leaves  ",@a, "\n");

执行上述代码时，会产生以下结果 -

pop() 4  leaves 123