Branch Coverage

blib/lib/CPAN/Complete.pm
Criterion Covered Total %
branch 0 58 0.0


line true false branch
55 0 0 unless @perlret
58 0 0 unless length $perlret[0] and length $perlret[0] >= $i
62 0 0 if (@tries == @perlret) { }
77 0 0 if $CPAN::DEBUG
79 0 0 if ($line =~ s/^((?:notest|f?force)\s*)//)
83 0 0 if ($pos == 0 or $line =~ /^(?:h(?:elp)?|\?)\s/) { }
0 0 elsif (not $line =~ /^[\!abcdghimorutl]/) { }
0 0 elsif ($line =~ /^a\s/) { }
0 0 elsif ($line =~ /^ls\s/) { }
0 0 elsif ($line =~ /^b\s/) { }
0 0 elsif ($line =~ /^d\s/) { }
0 0 elsif ($line =~ /^( [mru]|make|clean|dump|get|test|install|readme|look|cvs_import|perldoc|recent )\s/x) { }
0 0 elsif ($line =~ /^i\s/) { }
0 0 elsif ($line =~ /^reload\s/) { }
0 0 elsif ($line =~ /^o\s/) { }
0 0 elsif ($line =~ /^\S+\s/) { }
91 0 0 $rest ? :
103 0 0 if ($word =~ /^Bundle::/)
125 0 0 if (CPAN::_sqlite_running())
129 0 0 if $class eq "CPAN::Distribution"
149 0 0 if $CPAN::DEBUG
151 0 0 if @words == 1
152 0 0 if @words == 2 and $word
160 0 0 if $CPAN::DEBUG
162 0 0 if @words == 1
163 0 0 if @words == 2 and length $word
164 0 0 if (do { $words[1] eq 'index' }) { }
0 0 elsif ($words[1] eq 'conf') { }
0 0 elsif ($words[1] eq 'debug') { }