@keys = sort {$b->$word_list{$word} <=> $a->$word_list{$word}} values +%word_list [download]
In reply to sorting hashes by value by imlou