| line |
true |
false |
branch |
|
73
|
250 |
0 |
if ($args[0] =~ /^\d+$/) { }
|
|
75
|
3 |
247 |
if @args
|
|
89
|
35 |
2870 |
defined $s->{'on_wait_period'} ? :
|
|
92
|
3442 |
0 |
if ($s->{'max_proc'})
|
|
94
|
0 |
3442 |
unless defined $pid
|
|
95
|
3333 |
109 |
if ($pid) { }
|
|
115
|
5 |
15 |
unless $self->start($identification)
|
|
124
|
0 |
0 |
if ($s->{'max_proc'} == 0)
|
|
135
|
2567 |
875 |
unless keys %{$$s{"processes"};}
|
|
153
|
49 |
3201 |
if (-e $storable_tempfile)
|
|
157
|
0 |
49 |
if (not $retrieved or $@)
|
|
171
|
92 |
16 |
unless defined $data
|
|
177
|
0 |
16 |
if (not $stored or $@)
|
|
191
|
925 |
3250 |
unless defined $kid
|
|
193
|
0 |
3250 |
if $kid == 0 or $kid == -1
|
|
194
|
0 |
3250 |
unless exists $s->{'processes'}{$kid}
|
|
200
|
0 |
3250 |
$? & 128 ? :
|
|
211
|
25 |
182 |
defined $s->{'on_wait_period'} ? :
|
|
235
|
0 |
1 |
if $nbr > $self->max_procs
|
|
250
|
3189 |
61 |
unless my $code = $s->{'on_finish'}{$pid} || $s->{'on_finish'}{'0'}
|
|
264
|
60 |
3052 |
if (ref $s->{'on_wait'} eq "CODE")
|
|
266
|
60 |
0 |
if (defined $s->{'on_wait_period'})
|
|
267
|
60 |
0 |
unless defined $SIG{'CHLD'}
|
|
282
|
27 |
3306 |
if ref $s->{'on_start'} eq "CODE"
|
|
288
|
1119 |
3056 |
$flag ? :
|
|
295
|
2842 |
1299 |
unless my $p = waitpid($pid, &WNOHANG)
|
|
297
|
1297 |
2 |
if $p != -1
|
|
311
|
1103 |
1953 |
if (my $sleep_period = $self->{'waitpid_blocking_sleep'})
|
|
315
|
1101 |
1106 |
if defined $pid
|
|
317
|
2 |
1104 |
unless $self->running_procs
|
|
332
|
139 |
108 |
if $self->{'auto_cleanup'} and $self->{'parent_pid'} == $$ and -d $self->{'tempdir'}
|