Branch Coverage

blib/lib/Complete/Bash/History.pm
Criterion Covered Total %
branch 14 50 28.0


line true false branch
91 0 2 if ($args{'words'}) { }
109 1 6 if ($word eq '--') { }
1 5 elsif ($word =~ /\A-(\w*)\z/) { }
1 4 elsif ($word =~ /\A-([\w?])(.*)/) { }
2 2 elsif ($word =~ /\A--(\w[\w-]*)\z/) { }
110 0 1 if ($i == $cword)
135 2 0 if ($i < @$words)
136 0 2 if ($words->[$i] eq '=')
140 1 1 if ($words->[$i] =~ /\A-/)
249 0 0 unless my $fh = 'File::ReadBackwards'->new($path)
265 0 0 if ($res->{'word_type'} eq 'opt_val') { }
0 0 elsif ($res->{'word_type'} eq 'opt_name') { }
0 0 elsif ($res->{'word_type'} =~ /\Aarg,(\d+)\z/) { }
289 0 0 if $line =~ /^#\d+$/
291 0 0 if $max_hist_lines >= 0 and $num_hist_lines++ >= $max_hist_lines
294 0 0 unless @$hwords
307 0 0 if ($hwords->[0] =~ /\A[A-Za-z_][A-Za-z0-9_]*=/)
313 0 0 unless @$hwords
319 0 0 unless $hcmd eq $cmd
323 0 0 if ($which eq 'opt_name')
325 0 0 length $_ > 1 ? :
330 0 0 if ($which eq 'opt_val')
332 0 0 unless defined $_
338 0 0 if ($which eq 'arg')
339 0 0 unless @{$hpo->{'argv'};} > $pos