in reply to Hash asignement with RE and map()

my @results= m/ ... /;
my $ID= shift @results;
$hash{$ID}= [@results];

[download]
Something like that?

—John

In Section Seekers of Perl Wisdom