blib/lib/Term/Shell/MultiCmd.pm | |||
---|---|---|---|
Criterion | Covered | Total | % |
condition | 22 | 114 | 19.3 |
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) |
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' |
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 |