$pm->run_on_finish( sub { my ($pid, $exit_code, $ident) = @_; $tmpFiles[$ident] = undef; } );

##</code><code>##

my $pid = $pm->start($i) and next;

##</code><code>##

my $pid = $pm->start($i);
if ($pid) {
    print "Launched child $pid\n";
    next;
};