# Fork a unix process... my $pid; if($pid = fork) { print STDERR "parent pid=$$ child pid=$pid\n"; }elsif (defined $pid) { print STDERR "child pid=$$ pid=$pid\n"; # Must do setpgrp as child for nohup and job control stuff... setpgrp(0, $$); exec $unixcmd || die "Bad exec $!"; } kill 'INT', $pid;