Perl pop 函数



  • 描述

    pop 此函数返回ARRAY的最后一个元素,从数组中删除该值。请注意,ARRAY必须明确地是数组,而不是列表。如果省略了ARRAY,它将在主程序中或在eval STRING或BEGIN,CHECK,INIT或END块中调用时,从@ARGV中弹出最后一个值。否则,它将尝试从子例程中的@_数组中弹出信息。它与push相反,当push结合使用时,它允许您实现“堆栈”。请注意,应用pop后,数组将缩短一个元素。
  • 句法

    以下是此函数的简单语法-
    
    pop ARRAY
    
    pop
    
    
  • 返回值

    如果列表为空,则此函数返回undef,否则返回数组中的最后一个元素。
  • 示例

    以下是显示其基本用法的示例代码-
     
    @a = (1, 2, 3, 4);
    print("pop() ", pop(@a), "   leaves  ",@a, "\n");
    
    
    尝试一下
    执行结果:
    
    pop() 4  leaves 123