Help for this page

Select Code to Download

Select or download this

my %hash;

...
        push @{$hash{$$ary[1]}}, $$ary[0];
}
print Dumper \%hash;