Re^2: why can't I shift a split?

[johngg]

#print "\n", shift(234, 4, 55, 1900);        # Error: Can't overwrite the array, because it's fixed.

shift works by default on @_ in a subroutine (also true of pop) so you could use an on-the-fly sub to operate on a list.

johngg@aleatico:~$ perl -Mstrict -Mwarnings -E '
my @arr = ( 234, 405, 55, 1900 );
say shift @arr;
say sub { shift }->( 234, 405, 55, 1900 );
$_ = q{ab,ce ef};
say sub { shift }->( split m{,} );'
234
234
ab

I hope this is helpful.

Update: Corrected typo, s{on (?=by default)}{}.