Select Code to Download

my ($t0, $path0, $out);
$t0 = time;
...
  print $out $line; flush($out); # note below
  ... perform other processing on $line ...
}