Branch Coverage

blib/lib/Backticks.pm
Criterion Covered Total %
branch 61 84 72.6


line true false branch
166 174 10 if (blessed $source) { }
10 0 elsif (defined $source and not ref $source) { }
167 174 0 if $source->isa('Backticks')
173 10 0 if scalar grep({$_ eq 'Backticks';} Class::ISA::self_and_super_path($source))
182 1 173 if (_class_method(@_))
183 0 1 unless defined $Backticks::last_run
199 0 115 unless exists $field_defaults{$field}
202 83 32 if defined $$self{$field}
205 19 13 if ($field_has_package_var{$field})
207 1 18 if defined $pkg_var
219 0 6 unless exists $field_defaults{$field}
221 6 0 if (scalar @_)
222 0 6 unless $field_is_settable{$field}
225 5 1 if $field_causes_reset{$field}
240 0 5 unless _class_method(@_)
285 4 1 _class_method(@_) ? :
302 3 2 unless (eof P_STDOUT)
306 4 1 unless (eof P_STDERR)
310 4 1 if eof P_STDOUT and eof P_STDERR
313 0 4 unless waitpid $pid, 0
315 3 1 if ($?)
319 1 4 if ($@) { }
0 4 elsif ($self->returncode == -1) { }
0 4 elsif ($self->signal) { }
3 1 elsif ($self->exitcode) { }
332 0 0 if ($self->coredump)
342 1 4 if ($self->chomped)
346 1 0 if defined $$self{'stdout'}
347 1 0 if defined $$self{'stderr'}
348 1 0 if defined $$self{'merged'}
355 1 4 if ($self->autodie and not $self->success)
392 4 1 if $self->error
393 2 3 if $self->stdout
394 3 2 if $self->stderr
395 4 1 if $self->merged
396 3 2 if ($self->returncode)
412 0 30 unless (defined $val)
470 0 1 unless $self->error
472 1 0 if ($self->stderr ne '')
485 0 3 $self->error eq '' ? :
504 0 4 if ($$self{'error'})
511 10 0 unless _self(shift @_)->debug