X-Git-Url: http://andersk.mit.edu/gitweb/openssh.git/blobdiff_plain/b13b6202ea0edefcdb25bd572056a1d91ea35dd6..239542dc0f6f2d1aa27862c90e38316f48ebc563:/fixprogs diff --git a/fixprogs b/fixprogs index 4a70d2f9..af76ee39 100755 --- a/fixprogs +++ b/fixprogs @@ -44,9 +44,9 @@ foreach (@infile) { if (! ($pid = fork())) { # child close STDIN; close STDOUT; close STDERR; - open STDIN, "/dev/null"; - open STDERR, ">/dev/null"; + open (STDIN, "/dev/null"); + open (STDERR, ">/dev/null"); exec $path @args; exit 1; # shouldn't be here } @@ -65,7 +65,7 @@ foreach (@infile) { ($null, $null, $rate) = split(/,/, $ent[0]); $est = $rate / $entscale; # scale the estimate back } - } + } print OUT "\"$cmd\" $path $est\n"; }