in reply to Help with Hash
Untested:
foreach my $key (sort {$count{$a} <=> $count{$b}} keys %count) { ... }
In Section
Seekers of Perl Wisdom
in reply to Help with Hash
foreach my $key (sort {$count{$a} <=> $count{$b}} keys %count) { ... }