Branch Coverage

blib/lib/IPC/PrettyPipe/Cmd.pm
Criterion Covered Total %
branch 37 58 63.7


line true false branch
60 0 3 $swap ? :
231 0 0 'ARRAY' eq ref $_[0] && @{$_[0];} == 2 ? :
0 0 'HASH' eq ref $_[0] ? :
0 141 @_ == 1 ? :
247 13 127 if ($self->_has_init_args)
321 0 206 if @_ == 1
342 0 73 if $ref and exists $attr->{'value'}
344 204 1 if defined $attr->{'argfmt'}
347 0 205 if ('HASH' eq $ref) { }
73 132 elsif ('ARRAY' eq $ref) { }
0 132 elsif ($arg->$IPC::PrettyPipe::Cmd::_isa('IPC::PrettyPipe::Arg')) { }
363 1 72 if @$arg % 2
392 0 132 exists $attr->{'value'} ? :
460 13 258 if ($t->$IPC::PrettyPipe::Cmd::_isa('IPC::PrettyPipe::Arg::Format')) { }
0 258 elsif ($t->$IPC::PrettyPipe::Cmd::_isa('IPC::PrettyPipe::Arg')) { }
72 186 elsif (ref($t) =~ /^(ARRAY|HASH)$/) { }
0 186 elsif ($t->$IPC::PrettyPipe::Cmd::_isa('IPC::PrettyPipe::Stream')) { }
494 52 2 if ($stream->requires_file)
496 0 52 if ++$idx == @args
506 0 132 if /requires a file/
537 54 0 if ($spec->$IPC::PrettyPipe::Cmd::_isa('IPC::PrettyPipe::Stream')) { }
0 0 elsif (not ref $spec) { }
539 0 54 if @_
548 0 0 @_ ? :
611 6 25 @_ > 1 ? :
629 18 13 if ($nmatch == 1) { }
647 12 9 $match == $nmatch - 1 ? :
34 21 $match == 0 ? :
43 12 if $_->valsubst($pattern, $match == 0 ? $args->{'firstvalue'} : ($match == $nmatch - 1 ? $args->{'lastvalue'} : $value))