3 Perl - 列表赋值 - shift 和unshift 操作

shift 和unshift 操作

push 和pop 对数组的末尾进行操作（或者说数组右边有最大下标的元素，这依赖于你是怎样思考的）。相应的，unshift 和

shift 对一个数组的开头进行操作（数组的左端有最小下标的元素）。下面是一些例子：

@array = qw# dino fred barney #;

$m = shift (@array); #$m 得到“dino”, @array 现在为(“fred”, “barney”)

$n = shift @array; #$n 得到”fred”, @array 现在为（“barney”）

shift @array; #@array 现在为空

$o = shift @array; #$o 得到undef, @arry 仍为空

unshift(@array,5); #@array 现在为（5）

unshift @array,4; #@array 现在为(4,5)

@others = 1..3;

unshift @array, @others; #array 现在为（1,2,3,4,5）

和pop 类似，如果其数组变量为空，则返回undef。