Help for this page
@keys = sort {$b->$word_list{$word} <=> $a->$word_list{$word}} values +%word_list