http://qs321.pair.com?node_id=1214839


in reply to Re^3: Output data to a table or horizontal bar chart
in thread OUTPUT Data to a table or horizontal bar chart

I changed below code

for my $word (sort keys %count) {
to
for my $word (sort { $count{$b} <=> $count{$a} } keys %count) {
It seems to work. Anyway, Your Ideas r welcome