line |
true |
false |
branch |
36
|
40 |
62 |
unless $self->_match_token($got, $expected) |
52
|
41 |
43 |
if @$expected |
53
|
4 |
39 |
if @$got and not $self->prefix |
57
|
0 |
39 |
unless $matched |
70
|
0 |
0 |
if @$got > 1 |
71
|
0 |
0 |
unless @$expected |
74
|
0 |
0 |
@$got ? : |
77
|
0 |
0 |
ref $next eq 'ARRAY' ? : |
78
|
0 |
0 |
if ref $completion |
80
|
0 |
0 |
unless substr($completion, 0, length $part) eq $part |
93
|
11 |
107 |
if (ref $expected eq 'ARRAY') { } |
|
107 |
0 |
elsif (not ref $expected or ref $expected eq 'Regexp') { } |
114
|
102 |
5 |
if (not ref $e) { } |
|
5 |
0 |
elsif (ref $e eq 'Regexp') { } |
115
|
2 |
100 |
unless $self->case_sensitive |