in reply to Reading from an appended file
Please take a look at File::Slurp Module.
my $text = read_file( 'de.txt' ) ;
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.