Select Code to Download

foreach $line (<LOGFILE1>) {
  chomp($line); 
  foreach $childid (@Task_id) {

#!/usr/bin/perl
use strict;
...
  }
}
close OUT;