Select Code to Download

#!/usr/local/bin/perl

...
  }
  close $log or die "[$id] $$ couldn't close log: $!";
}