next if $word=~/\b$w\b/;