I have some code that allows the user to start a process, but not to have to wait for the process to complete before moving on.
To do this a fork is used, and close STDOUT; invoked before the long process commences
This has been working fine but recently the process has started to hang, as though the close STDOUT; is being ignored. Can anyone suggest what might be going wrong, or if there is another way of starting the process then letting it run in the background?
my $pid;
if ($pid = fork) {
print qq~<response type="4" status="1">~;
print qq~ </response>\n~;
} elsif (defined $pid) {
close STDOUT;
#exit;
my $myba = mybaapp->new();
my $linkbase = $myba->mob2myba($url);
$myba->sendinfo($smsfrurl);
exit;
} else {
die "Major error: $!";
} #end fork