length($a) <=> length($b) || $a cmp $b [download]
In reply to Re: Sort hash by key length and alphabetically by moritz in thread Sort hash by key length and alphabetically by perlcat