if($word=~/($wordcnt)/io){