Select Code to Download

#!/usr/bin/env perl
use strict;
...
  print "reaping $pid\n";
  waitpid($pid,0);
}

I am child 20199. @kids count = -1. my dir is dir1
spawned child 20199
...
reaping 20200
reaping 20201
reaping 20202