http://www.perlmonks.org?node_id=600501


in reply to Re: How to get ($1, $2, ...)?
in thread How to get ($1, $2, ...)?

my @groups; {no strict 'refs'; @groups = map $$_, 1..$#-;}

Nice Educated_foo!

Update: Removed use of grep, didn't notice it in there the first time ;)


___________
Eric Hodges