| line |
true |
false |
branch |
|
133
|
0 |
0 |
if (ref $item eq 'ARRAY') { } |
|
|
0 |
0 |
elsif (ref $item eq 'HASH') { } |
|
|
0 |
0 |
elsif (defined $item and $item =~ /^-/) { } |
|
|
0 |
0 |
elsif (defined $item and length $item) { } |
|
135
|
0 |
0 |
if (length $value) |
|
145
|
0 |
0 |
if ($item =~ /^-and$/) { } |
|
|
0 |
0 |
elsif ($item =~ /^-or$/) { } |
|
157
|
0 |
0 |
if (do {
uc $item eq $_
}->any(@KEYWORDS)) { } |
|
176
|
0 |
0 |
unless @$array |
|
182
|
0 |
0 |
if (length $value) |
|
186
|
0 |
0 |
unless @items |
|
188
|
0 |
0 |
if ($op eq 'AND') |
|
199
|
0 |
0 |
if (@items > 1) |
|
205
|
0 |
0 |
if (@items) |
|
215
|
0 |
0 |
if (length $_[0] and not substr($_[0], -1, 1) =~ /^[\(\s]$/) |