如何分叉新进程并在Perl中恢复其PID？

Question

我的问题与在Perl代码中使用 fork（）有关。 我希望fork一个新进程并捕获它的PID并将其返回给被调用程序。在Perl中是否有一些命令可以实现这一点？

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

是的， fork

从该页面引用：

  

将子pid返回给父级   进程， 0 到子进程，或   如果fork不成功，则 undef 。

Answer 3

fork 将子pid返回给父级，0返回给孩子。

Answer 4

好吧，Perl的 fork 函数将子代码的 PID 返回给父代，0代表子代，这不是你想要的吗？