perl -nlE'($w//=[sort pop=~/./g])~~[sort//g]&&say' ./dict.txt acert