Select Code to Download

for (my $i = 3; $i >= 0; $i--) {
  close($handles[$i]);
}

if (!open($handles[$i], "|-") {
  ...close $handles[0..$i-1]...
  child(); exit(0);
}