my $pid = fork; if ( ! defined $pid ) { # fork failed throw_invalid "Couldn't fork"; } elsif ( $pid > 0 ) { # parent exit; } else { while ( 1 ) { sleep 1; # and do other snazzy stuff forever } }