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;
1. Keep it simple
2. Just remember to pull out 3 in the morning
3. A good puzzle will wake me up
Many. I like to torture myself
0. Socks just get in the way
Results (289 votes). Check out past polls.