Select Code to Download

#!c:\usr\bin\perl.exe
use warnings;
...
my $in = <STDIN>;
print "READ FROM STDIN:$/$in$/";
exit;

C:>perlver perlver_bug.pl

...
 ------------------------------------------------------------
 use warnings;
 ------------------------------------------------------------