Select Code to Download

#!/usr/bin/perl

...
  close STDERR or die;
  print "log contents: $log";
  }

before on STDERR
log contents: test message should be in log
after on STDERR