如何在 Perl 中 fork 一个新进程并取回其 PID？

Question

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

Answer 1

是的， fork

引用该页面：

它将子进程 pid 返回给父进程
进程，0 到子进程，或者
undef 如果分叉不成功。

Answer 2

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 3

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

Answer 4

好吧，Perl 的 fork 函数将子进程的 PID 返回给父进程，将 0 返回给子进程，这不是您想要的吗？