Help for this page
use POSIX; ... code here ... $child_pid = waitpid(-1, WNOHANG);
use POSIX; if ($pid = fork) { ... sleep 15; exit(0); }
use POSIX; $keep_going = 1; ... #one child death. $SIG{CHLD} = \&REAPER }