Should it be print "$count->{$flag}\t";?
In reply to Re^3: sort hash ignoring one hash level by Cristoforo in thread sort hash ignoring one hash level by AWallBuilder