Perl 防"健忘“笔记 （splice 函数）

splice 操作数组 （举例来自《perl 语言入门》）

@removed   =     splice @array,  1,      2,         qw(wilma dxxu); 删除元素的数组             数组   位置  长度        增加的数组元素

使用方法
1

@array = qe(pebbles dino fred barney betty);
@removed = splice @array, 2;

#@removed 为 qw(fred barney betty)#@array 为 qw(pebbles dino)

2 

@array = qw(pebbles dino fred barney betty);
@removed = splice @array, 1, 2;

#删除dino与fred两个元素#@removed变成 qw(dino fred)#@array 为 qw(pebbles barney betty)

3 

@array = qw(pebbles dino fred barney betty);
@removed = splice @array, 1, 2, qw(wilma);

#删除了dino和fred#@removed 为 qw(dino fred)#@array 为 qw(pebbles wilma barney betty)

4

@array = qw(pebbles dino fred barney betty);
@removed = splice @array, 1, 0, qw(wilma);

#不删除元素 @removed = qw()#@array 为 qw(pebbles wilma dino fred barney betty)