kill('KILL', $$);
}
- # sync with parent (signal that we are read)
+ # sync with parent (signal that we are ready)
if ($sync) {
print "$upid\n";
} else {
}
if ($outfh) {
print $outfh $line;
+ $outfh->flush();
}
}
}
if ($outfh) {
print $outfh "TASK ERROR: $err\n";
}
- kill (15, $cpid);
+ kill (-15, $cpid);
} else {
- kill (9, $cpid); # make sure it gets killed
+ kill (-9, $cpid); # make sure it gets killed
}
close($outfh);