C:\test>perl -MPOSIX=:sys_wait_h 
-le"$pid=open O, q[perl -esleep(10)|];print waitpid $pid,&WNOHANG while sleep 1"
0
0
0
0
0
0
0
0
0
3204
-1
-1
Terminating on signal SIGINT(2)