c:\@Work\Perl\monks>perl -wMstrict -le
"print qq{Enter some lines, the press [Ctrl-Z][Enter]:};
 print reverse <STDIN>;
"
Enter some lines, the press [Ctrl-Z][Enter]:
line 1
line two
3rd line
^Z
3rd line
line two
line 1