@array = sort{$hash{$a} <=> $hash{$b} || $a <=> $b} keys(%hash);