清单3.10.txt

< linux网络编程工具>>配套源码

@members = ("Time", "Flies");
@initiates = ("An", "Arrow");
splice(@members, 2, 0, "Like", @initiates);
print "@members\n";
@removed = splice(@members, 0, 1, "Fruit");
splice(@members, -2, 2, "A", "Banana");
print "Removed: @removed\n";
print "@members\n";