sub REAPER {
  {} until ( waitpid(-1, WNOHANG) == -1)
}

##</code><code>##

sub REAPER {
  1 until ( waitpid(-1, WNOHANG) > 0)
}