Select Code to Download

#!/usr/bin/perl

...
}
close(LOG);
close(OUTPUT);

open(OUTPUT,">>",$output) or die("Could not open conf file.");
open(LOG, $logfile) or die("Could not open conf file.");
...
  }
 }
}