Re: mysterious fork() failure


No such thing as a small change
	PerlMonks

Re: mysterious fork() failure

by dws (Chancellor)

on Jan 05, 2002 at 01:11 UTC ( #136383=note: print w/replies, xml )

Need Help??

in reply to mysterious fork() failure

    # create new directory here
    if (($pid = fork()) == 0) {
       # remove directory here
    }
    if (!defined($pid)) {
       # log fork() failure here
       # remove directory here
    }
[download]

You need to reverse your tests, and check for undef'ness of $pid first. For enlightenment as to why, ponder on print undef == 0 ? "true!\n" : "false\n";

Comment on Re: mysterious fork() failure Select or Download Code

Replies are listed 'Best First'.

Re: Re: mysterious fork() failure
by Marcello (Hermit) on Jan 05, 2002 at 02:02 UTC

if (!defined($pid = fork())) {
   # parent process, fork() failure
}
elsif ($pid == 0) {
   # child process, successful fork()
}
elsif ($justSomeVar == 1) {
   # parent process, successful fork()
}
else {
   # parent process, successful fork()
}
[download]

[reply]
[d/l]

In Section Seekers of Perl Wisdom