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
#删除了dino和fred@array = qw(pebbles dino fred barney betty); @removed = splice @array,2,qw(wilma);
#@removed 为 qw(dino fred)
#@array 为 qw(pebbles wilma barney betty)
4
#不删除元素 @removed = qw()@array = qw(pebbles dino fred barney betty); @removed = splice @array,qw(wilma);
#@array 为 qw(pebbles wilma dino fred barney betty)