use autodie;

if (my $pid = fork) {
    # Some parenting wouldn't go amiss
} else {
    # Do some child stuff
}