http://www.perlmonks.org?node_id=970537


in reply to Re^2: sort hash ignoring one hash level
in thread sort hash ignoring one hash level

Could it be the line: print "$count\t";

Should it be print "$count->{$flag}\t";?