my $pid = fork;
if ($pid) {
    # give thank u message.
} elsif (defined $pid) {
    # close STDIN
    # close STDOUT
    # send emails.
    # exit.
} else {
    # Error message.
}