Select Code to Download

    use POSIX ":sys_wait_h";
    #...
    do {
        $kid = waitpid(-1, WNOHANG);
    } until $kid > 0;

if (waitpid($child_pid, WNOHANG) > 0) {
   ... the child just died ...
}