if ($word eq $prevword) {