| line |
true |
false |
branch |
|
17
|
0 |
0 |
unless defined $wnohang |
|
20
|
0 |
0 |
unless defined $wexited |
|
33
|
0 |
0 |
unless $loop |
|
34
|
0 |
0 |
if %args |
|
47
|
0 |
0 |
unless defined $pid |
|
48
|
0 |
0 |
if not $cb or ref $cb ne "CODE" |
|
52
|
0 |
0 |
unless defined $reap |
|
53
|
0 |
0 |
if %opts |
|
55
|
0 |
0 |
if not $pid =~ /\A\d+\z/u or $pid < 1 |
|
58
|
0 |
0 |
if (my $old = $self->{'by_pid'}{$pid}) |
|
64
|
0 |
0 |
$reap ? : |
|
92
|
0 |
0 |
unless eval {
do {
require Linux::FD::Pid;
1
}
} |
|
102
|
0 |
0 |
unless my $entry = $self->{'by_pid'}{$pid} |
|
105
|
0 |
0 |
unless $entry->{'sub'} and $entry->{'sub'}{'_active'} |
|
108
|
0 |
0 |
if ($entry->{'reap'}) { } |
|
114
|
0 |
0 |
unless ($ok) |
|
121
|
0 |
0 |
unless defined $status |
|
143
|
0 |
0 |
unless $self->{'_active'} |
|
146
|
0 |
0 |
unless my $owner = $self->{'_owner'} |
|
150
|
0 |
0 |
unless $entry |
|
153
|
0 |
0 |
if (my $w = $entry->{'w'}) |