use of shift exists?

[Mental Patient 0057]

this moves one item over
$a = shift @rray;

is there a way to move three at a time?
($a, $b, $c) = shift 3things @rray?
($d, $e, $f, $g) = shift nowShift4Things @rray?

 

[David Bouman]

this moves one item over
$a = shift @rray;

is there a way to move three at a time?

Yes, use splice. A perldoc -f splice will explain it.

 

[David H. Adler]

Yes, use splice. A perldoc -f splice will explain it.

Or, if you want to keep your array intact, an array slice:
($a, $b, $c) = @array[0..2];
($d, $e, $f) = @array[3..5];

dha