Re: using pop a lot

splice @array,-5,5,();
[download]

A directly executable example:

$ perl -e '@a=(1,2,3,4,5);splice @a,-2,2,();print "@a\n"'
1 2 3
[download]

Liz

Comment on Re: using pop a lot Select or Download Code

Replies are listed 'Best First'.
Re: using pop a lot by Abigail-II (Bishop) on Oct 10, 2003 at 12:29 UTC
Or shorter: `splice @array => -5;` [download] Abigail	[reply] [d/l]
Re: Re: using pop a lot by liz (Monsignor) on Oct 10, 2003 at 12:57 UTC
Actually, it can still get shorter without splice(): `$#array -= 5;` [download] Liz Update: Although I would probably use Abigail-II's way, but without the fat comma: `splice @a,-5;` [download]	[reply] [d/l] [select]