# push @array, @others; splice @array, @array, 0, @others; # my $element = pop @array my $element = splice @array, $#array, 1; # my $element = shift @array my $element = splice @array, 0, 1; # unshift @array, @others splice @array, 0, 0, @others;