Condition Coverage

blib/lib/Term/Shell/MultiCmd.pm
Criterion Covered Total %
condition 22 114 19.3


and 3 conditions

line !l l&&!r l&&r condition
89 2 39 0 $_[0] and ref $_[0]
111 7 0 0 @p and not eval { do { &GetOptions(\%p, @p) } }
143 8 0 15 @w and 'HASH' eq ref $c
399 0 0 0 $root and $o->{'cmds'} != $root
404 0 0 0 exists $$root{$_->[0]} and $$root{$_->[0]}[1] eq $_->[1]
650 0 0 0 'ARRAY' eq ref $hist and @$hist
651 0 0 0 ref $d and ref $more
0 0 0 ref $d and ref $more and ref $d eq ref $more
686 0 0 0 not $o->{'stop'} and defined(my $line = $o->{'term'}->readline($o->prompt))
714 0 0 0 $comp and $comp == \&Term::Shell::MultiCmd::_root_command_comp
716 0 0 0 @args and $args[-1] =~ /^\-\-?(.*)/
820 0 0 0 $par and not $line
887 8 0 0 $c eq 'cd' and $o->{'root_cmd'}
0 0 0 $c eq 'cd' and $o->{'root_cmd'} and not exists $r->{'cd'}
892 0 8 0 $o->{'help_cmd'} and $c eq 'ls' && !exists $r->{'ls'} || $c eq 'help' && !exists $r->{'help'}
913 7 0 0 $o->{'piper'} and $fh = $o->{'pager'}->()
930 6 1 0 $o->{'empty_cmd'} and $cmd eq ($o->{'root'} || $o->{'cmds'})
7 0 0 $o->{'empty_cmd'} and $cmd eq ($o->{'root'} || $o->{'cmds'}) and 0 == length join('', @args)

or 2 conditions

line l !l condition
115 0 7 $p{'ARGV'} ||= [@ARGV]
132 41 0 $o->{'delimiterRE'} || '\\s+'
137 8 0 $o->{'delimiter'} || ' '
142 8 0 $o->{'delimiter'} || ' '
550 0 8 $r->{$w} ||= {}
737 0 0 $c[-1] || ''
785 0 0 $h->{$k}[0] || 'a command'
0 0 $h->{$k}{$dlm} || 'a prefix'
790 0 0 $h->{$dlm} || 'A command prefix'
933 0 7 $cmd->[3] || ''
968 0 0 $1 || ''
990 0 0 $o->{'prompt'} || 'shell'

or 3 conditions

line l !l&&r !l&&!r condition
112 0 0 0 $1 || $_
142 0 0 8 $o->{'root'} || $o->{'cmds'}
381 0 8 0 ref $class || $class
684 0 0 0 $o->{'term'} ||= &_new_readline($o)
721 0 0 0 'ARRAY' eq ref $cb or 'HASH' eq ref $cb
724 0 0 0 'ARRAY' eq ref $comp or 'HASH' eq ref $comp
873 0 0 0 not $r or ref $r
874 0 0 0 !$r || $c =~ s/$r//
881 0 0 8 $o->{'root'} || $o->{'cmds'}
892 0 0 8 $c eq 'ls' && !exists $r->{'ls'} || $c eq 'help' && !exists $r->{'help'}
930 0 0 1 $o->{'root'} || $o->{'cmds'}
969 0 0 0 $pos || length $lu