Select Code to Download

#!/usr/bin/env perl
use warnings;
...
    print "[$$] done with child process for $num\n";
    return $num;
}

[7685] Starting main program
[7685] child pid is 7686
...
[7688] done with child process for 3
[7685] done with pid 7688
[7685] End of main program