my $word = shift;