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