...beginning of subroutine
$pid = fork();
$pid;
if ($pid) {
print "The mailing has began";
exit(0);
}
else {
close (STDOUT);
...actual mailing