if ($word ne $prevword) {