Select Code to Download

perl -e 'print "Output:\n"; for $i (1..3) {
 print "$i: ".(defined($_)? "defined\n":"not defined\n");
...
1: not defined
2: defined
3: not defined

open( STDERR, ">", \$stderr_log );