现在我们将引入另一个名为splice()的函数,该函数具有以下语法:
splice @ARRAY, OFFSET [ , LENGTH [ , LIST ] ]
此函数将删除由OFFSET和LENGTH指定的@ARRAY元素,如果指定,则将其替换为LIST。最后,它返回从数组中删除的元素。以下是示例-
#!/usr/bin/perl @nums = (1..20); print "Before - @nums\n"; splice(@nums, 5, 5, 21..25); print "After - @nums\n";
输出结果
这将产生以下结果-
Before - 1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16 17 18 19 20 After - 1 2 3 4 5 21 22 23 24 25 11 12 13 14 15 16 17 18 19 20
在这里,实际替换从第6个数字开始,然后用数字21、22、23、24和25将5个元素从6替换为10。