Daftar Isi

• splice ARRAY or EXPR,OFFSET,LENGTH,LIST

• splice ARRAY or EXPR,OFFSET,LENGTH
• splice ARRAY or EXPR,OFFSET
• splice ARRAY or EXPR

  Removes the elements designated by OFFSET and LENGTH from an array, andreplaces them with the elements of LIST, if any. In list context,returns the elements removed from the array. In scalar context,returns the last element removed, or undef if no elements areremoved. The array grows or shrinks as necessary.If OFFSET is negative then it starts that far from the end of the array.If LENGTH is omitted, removes everything from OFFSET onward.If LENGTH is negative, removes the elements from OFFSET onwardexcept for -LENGTH elements at the end of the array.If both OFFSET and LENGTH are omitted, removes everything. If OFFSET ispast the end of the array, Perl issues a warning, and splices at theend of the array.

  The following equivalences hold (assuming $#a >= $i )

   push(@a,$x,$y)  splice(@a,@a,0,$x,$y)
   
   pop(@a) splice(@a,-1)
   
   shift(@a)   splice(@a,0,1)
   
   unshift(@a,$x,$y)   splice(@a,0,0,$x,$y)
   
   $a[$i] = $y splice(@a,$i,1,$y)
   

  Example, assuming array lengths are passed before arrays:

   sub aeq {  # compare two list values
   
   my(@a) = splice(@_,0,shift);
   
   my(@b) = splice(@_,0,shift);
   
   return 0 unless @a == @b;  # same len?
   
   while (@a) {
   
   return 0 if pop(@a) ne pop(@b);
   
   }
   
   return 1;
   
   }
   
   if (&aeq($len,@foo[1..$len],0+@bar,@bar)) { ... }
   

  Starting with Perl 5.14, splice can take scalar EXPR, which must hold areference to an unblessed array. The argument will be dereferencedautomatically. This aspect of splice is considered highly experimental.The exact behaviour may change in a future version of Perl.

  To avoid confusing would-be users of your code who are running earlierversions of Perl with mysterious syntax errors, put this sort of thing atthe top of your file to signal that your code will work only on Perls ofa recent vintage:

   use 5.014;# so push/pop/etc work on scalars (experimental)