Branch Coverage

blib/lib/Sys/Cmd/Process.pm
Criterion Covered Total %
branch 44 72 61.1


line true false branch
22 2 0 if exists &{$c . '::_NEW';}
23 0 2 if exists &{$c . '::BUILD';}
25 0 2 if (exists &{$c . '::DOES';})
32 31 0 @_ > 1 ? :
31 0 @_ ? :
47 0 2 @_CLASS > 1 ? :
48 0 2 if exists $Sys::Cmd::Process::_FIELDS->{'FIELDS'}
50 0 31 if (my(@missing) = grep({not exists $_[0]{$_};} "cmd", "pid", "stderr", "stdin", "stdout"))
57 0 31 if exists $_[0]{'_ret'}
58 0 31 if $@
61 0 31 if $@
73 31 86 if (@_ > 1)
75 0 31 if $@
83 1 116 if $@
89 0 18 if @_ > 1
92 0 24 if @_ > 1
97 0 117 if @_ > 1
103 0 31 if (@_ > 1)
106 0 160 if @_ > 1
109 0 86 if @_ > 1
114 31 0 if (@_ > 1)
117 0 166 if @_ > 1
118 0 179 if @_ > 1
119 0 152 if @_ > 1
188 18 0 if (wantarray) { }
202 0 150 unless my $fh = $self->$h
203 86 64 unless $fh->opened
204 24 40 if ($h eq "stderr")
208 0 64 unless $fh->close
217 31 31 if $self->has__ret
221 31 0 if ($pid > 0)
229 0 31 if ($pid != $self->pid)
236 0 31 if ($ret == -1)
262 2 29 if (my $subref = $self->on_exit)
268 4 27 if ($self->signal != 0) { }
2 25 elsif ($self->exit != 0) { }