| line |
true |
false |
branch |
|
137
|
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) { } |
|
139
|
0 |
0 |
if (length $value) |
|
149
|
0 |
0 |
if ($item =~ /^-and$/) { } |
|
|
0 |
0 |
elsif ($item =~ /^-or$/) { } |
|
162
|
0 |
0 |
if (&any(sub {
uc $item eq $_;
}
, @KEYWORDS)) { } |
|
181
|
0 |
0 |
unless @$array |
|
187
|
0 |
0 |
if (length $value) |
|
191
|
0 |
0 |
unless @items |
|
193
|
0 |
0 |
if ($op eq 'AND') |
|
204
|
0 |
0 |
if (@items > 1) |
|
210
|
0 |
0 |
if (@items) |
|
220
|
0 |
0 |
if (length $_[0] and not substr($_[0], -1, 1) =~ /^[\(\s]$/) |