Select Code to Download

#!/usr/bin/perl
# return.pl
print STDERR "err1!\nerr2!\n";
print STDOUT "out!\nout again!\n";
exit 1;

#!/usr/bin/perl
# test1.pl
...
print "---\$?$n";     print $? . $n;
print "---results$n"; foreach(@results) { print $_ . $n };
print "---errors$n";  foreach(@errors)  { print $_ . $n };

---pid
1480
...
---errors
err1!
err2

#!/usr/bin/perl -w
# test2.pl
...
print "---return$n";  print $return>>8 , $n;
print "---results$n"; foreach(@results) { print $_ . $n };
print "---errors$n";  foreach(@errors)  { print $_ . $n };

err1!
err2
...
1
---results
---errors