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