... my $pid = $pm->start and next; do { use POSIX; setsid; }; # child side ...