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 Englishman in New York
An American Werewolf in London
An American in Paris
The Innocents Abroad
An Idiot Abroad
Robinson Crusoe on Mars
A Connecticut_Yankee in King Arthur's Court
There and Back Again
Travels into Several Remote Nations of the World
Results (97 votes). Check out past polls.