printf "%-6s: %-2d\n",$_, $seen{$_} for (sort keys %seen);