linux 进程退出原因,linux – 为什么waitpid不等待进程退出？

在下面的脚本中,我试图弄清楚waitpid是如何工作的,但它不会等待ssh进程退出.完成后立即打印,而不是在ssh过程存在之后.

题

当我给它的pid退出时,如何才使waitpid继续？

#!/usr/bin/perl

use strict;

use warnings;

use Parallel::ForkManager;

use POSIX ":sys_wait_h";

my $pm = Parallel::ForkManager->new(5);

my $pid = $pm->start;

my $p = $pid;

if (!$pid) {

system("ssh 10.10.47.47 sleep 10");

$pm->finish;

}

$p = qx(/usr/bin/pgrep -P $p);

print "ssh pid is $p\n";

my $kid;

do {

$kid = waitpid($p,0);

} while $kid > 0;

print "done\n";

我也试过了

while (1) {

$p = kill 0,$p;

print "x";

sleep 1 if $p;

print "*";

last unless $p;

}

但由于某种原因它甚至没有达到第一次印刷,也从未退出.