open (...) or die "cannot fork: $!";
...
close (...) or die "cannot close pipe: $!";