Forking problems

fawkin has asked for the wisdom of the Perl Monks concerning the following question:

Replies are listed 'Best First'.
Re: Forking problems by poolpi (Hermit) on Mar 21, 2008 at 14:14 UTC
from perldoc It returns the child pid to the parent process, 0 to the child process, or undef if the fork is unsuccessful Poolpi 'Ebry haffa hoe hab im tik a bush'. Jamaican proverb	[reply]
Re: Forking problems by lidden (Curate) on Mar 21, 2008 at 16:31 UTC
Here is a little example of using fork(): `if(my $pid = fork){ print "I am the parent my pid is $$ and my child has pid: $pid\n"; } elsif(defined $pid and $pid == 0){ print "I am the child and my pid is $$\n"; } else{ print "Oh no :-(\n"; }` [download] Update: Oops fixed bug pointed out by pc88mxer below.	[reply] [d/l]
Re^2: Forking problems by pc88mxer (Vicar) on Mar 21, 2008 at 17:00 UTC
`undef` will evaluate to 0 in numeric context, so you'll really want: `if (!defined(my $pid = fork)) { print "Oh no\n"; } elsif ($pid == 0) { print "in child\n"; } else { print "in parent\n"; }` [download]	[reply] [d/l] [select]
Re^2: Forking problems by ikegami (Patriarch) on Mar 22, 2008 at 01:14 UTC
The `and $pid == 0` in your updated solution is redundant. It will always be true.	[reply] [d/l]
Re: Forking problems by Fletch (Bishop) on Mar 21, 2008 at 14:14 UTC
As anyone can see by the relevant code you posted along with your incredibly verbose and detailed question the problem lies on line 17. HTH. P.S. See How (Not) To Ask A Question. The cake is a lie. The cake is a lie. The cake is a lie.	[reply]