Perl shift 函数

  • 描述

    shift 此函数返回数组中的第一个值,将其删除并将数组列表的元素向左移动一个。如果未指定ARRAY,则在子例程中移动@_数组,否则在@ARGV中移动。shift从本质上讲与pop相同,只是从数组的开头而不是结尾获取值。
  • 句法

    以下是此函数的简单语法-
    
    shift ( [ARRAY] )
    
    shift
    
  • 返回值

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

    以下是显示其基本用法的示例代码-
     
    @array = (1..5);
    while ($element = shift(@array)) {
       print("$element - ");
    }
    print("The End\n");
    
    尝试一下
    执行以上代码后,将产生以下结果--
    
    1 - 2 - 3 - 4 - 5 - The End