in reply to sort hash based on values
@sort_keys = sort { $hoa{$a}[0] cmp $hoa{$b}[0] } keys %hoa; [download]