Branch Coverage

blib/lib/IPC/PrettyPipe.pm
Criterion Covered Total %
branch 47 74 63.5


line true false branch
79 0 3 $swap ? :
251 5 5 if @_
316 43 10 if @_
351 0 0 'HASH' eq ref $_[0] ? :
0 110 @_ == 1 ? :
364 110 0 if ($self->_has_init_cmds)
412 139 0 if @_ == 1
430 0 139 if defined $attr->{'argfmt'}
434 123 16 if ($attr->{'cmd'}->$IPC::PrettyPipe::_isa('IPC::PrettyPipe::Cmd')) { }
16 0 elsif ($attr->{'cmd'}->$IPC::PrettyPipe::_isa('IPC::PrettyPipe')) { }
438 0 123 if keys %$attr
451 0 16 if keys %$attr
455 11 5 if ($self->merge_pipes and $cmd->streams->empty) { }
471 0 0 exists $attr->{'args'} ? :
535 4 139 if ($t->$IPC::PrettyPipe::_isa('IPC::PrettyPipe::Arg::Format')) { }
10 129 elsif ($t->$IPC::PrettyPipe::_isa('IPC::PrettyPipe::Cmd')) { }
6 123 elsif ($t->$IPC::PrettyPipe::_isa('IPC::PrettyPipe')) { }
109 14 elsif ('ARRAY' eq ref $t) { }
0 14 elsif ($t->$IPC::PrettyPipe::_isa('IPC::PrettyPipe::Stream')) { }
14 0 elsif (not ref $t) { }
557 3 106 if (($cmd = $t->[0])->$IPC::PrettyPipe::_isa('IPC::PrettyPipe')) { }
558 0 3 if @$t > 1
590 14 0 if ($stream->requires_file)
592 0 14 if ++$idx == @args
602 0 0 unless /requires a file|cannot parse/
641 14 0 if ($spec->$IPC::PrettyPipe::_isa('IPC::PrettyPipe::Stream')) { }
0 0 elsif (not ref $spec) { }
643 0 14 if @_
652 0 0 @_ ? :
685 2 24 unless $_->valmatch($pattern) and 1
761 8 4 @_ > 1 ? :
776 5 7 if ($nmatch == 1) { }
799 7 3 $match == $nmatch - 1 ? :
12 10 $match == 0 ? :
22 0 if $_->valsubst($pattern, $match == 0 ? $args->{'firstvalue'} : ($match == $nmatch - 1 ? $args->{'lastvalue'} : $value))
821 36 40 unless &use_package_optimistically($try)->DOES($role)
828 0 40 unless defined $module