Select Code to Download

 use strict;
  use warnings;
...
                         }
                  );
  print "code took:",timestr($obj),"\n";

use strict;
use Benchmark ;
...
    print "Waited for child $cpid\n";
}
print "Parent Exiting\n";