# child
close STDIN; close STDOUT; close STDERR;
open (STDIN, "</dev/null");
- open (STDOUT, ">/tmp/foo");
+ open (STDOUT, ">/dev/null");
open (STDERR, ">/dev/null");
exec $path @args;
exit 1; # shouldn't be here
($null, $null, $rate) = split(/,/, $ent[0]);
$est = $rate / $entscale; # scale the estimate back
}
- }
+ }
print OUT "\"$cmd\" $path $est\n";
}