Select Code to Download

#!/usr/bin/perl
use strict;
...
print "got whatever: $whatever";

exit;

#!/usr/bin/perl

...
}; 

print "got in: $in\n";

whatever
Use of uninitialized value in concatenation (.) or string at foo.pl li
+ne 17.
got in:

#!/usr/bin/perl

...

exit;