Select Code to Download

my $status = $pipe->close;
die $! if $$ != $mainpid;

if ($$ == $mainpid) {
    $pipe->close or die $!;
}