Wie gabeln ich einen neuen Prozess und bekommen seine PID in Perl zurück?

Question

ist mein Problem mit fork() innerhalb Perl-Code verwendet. Ich möchte einen neuen Prozess gabeln und seine PID zu erfassen und senden Sie es an den Angerufenen Programm zurück. Gibt es einen Befehl in Perl, die dies möglich machen würden?

Answer 1

my $pid = fork();
if ($pid == 0)
{
    # We are the child.
}
elsif defined($pid)
{
    # We are the parent of child with PID=pid
}
else
{
    # The fork failed
}

Answer 2

ja, fork

von dieser Seite Zitiert:

  

Es gibt das Kind pid an die Mutter   Prozess , 0 das Kind Prozess, oder   undef wenn die Gabel nicht erfolgreich ist.

Answer 3

Gabel zu dem Eltern-Kind-pid zurück und 0 für das Kind.

Answer 4

Nun, Perl fork Funktion gibt PID von Kind zu Eltern und 0 bis Kind, ist nicht das, was Sie wollen?