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 |