shift

構文

• shift ARRAY

解説

shift は配列 ARRAY から最初の要素を取り除き、その値を返します。 もし配列が空の場合は未定義値を返します。

my @array = ( 1, 2, 3 );
my $val   = shift @array;
print $val;                    # 1
print join( ', ', @array );    # 2, 3

ARRAY が省略された場合、メインプログラムなら @ARGV が適用され、 サブルーチンの中なら @_ が適用されます。

&do_something( 1, 2, 3 );

sub do_something {
    my $arg = shift;
    print $arg;    # 1
}