@words = split(/ /, $word);