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;
An electronic device
Being the designated driver
Spending time with a celebrity
I never won anything
I never play the lottery
I haven't checked my spam folder recently
Results (389 votes). Check out past polls.