in reply to Reading Files
perl -MData::Dumper -e 'print Dumper split /\s+/, shift' "do cat fr"
my @words = split/\s+/, $word;
Yes, like that if your input is split's default arugment $_. Or in your case:
my @words = split/\s+/,$word;
Yes, I watch meteor showers
No, I do not watch meteor showers
My meteors prefer to bathe
Results (190 votes). Check out past polls.