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