line |
true |
false |
branch |
103
|
0 |
0 |
unless defined $$args{'FIND'} |
104
|
0 |
0 |
unless defined $$args{'DATA'} |
106
|
0 |
0 |
if not $$args{'SEARCH'} or $$args{'SEARCH'} =~ /key|all/ or ref $$args{'FIND'} eq 'ARRAY' |
108
|
0 |
0 |
if $$args{'SEARCH'} and $$args{'SEARCH'} =~ /value|all/ |
110
|
0 |
0 |
if not $$args{'RETURN'} or $$args{'RETURN'} =~ /value|all/ |
111
|
0 |
0 |
if $$args{'RETURN'} and $$args{'RETURN'} =~ /key|all/ |
112
|
0 |
0 |
$$args{'RETURN'} && $$args{'RETURN'} =~ /container/ ? : |
121
|
0 |
0 |
if ref $_ |
|
0 |
0 |
unless ref $p and grep {$_ == $p if ref $_;} @unique |
132
|
0 |
0 |
if (ref $p) |
133
|
0 |
0 |
if (grep {$p == $_;} @$refs) |
141
|
0 |
0 |
if (ref $p and $p =~ /HASH/) { } |
|
0 |
0 |
elsif (ref $p and $p =~ /ARRAY/) { } |
|
0 |
0 |
elsif (not ref $p and defined $p and $sv and ref $f eq 'Regexp' && $p =~ /$f/ || $p eq $f) { } |
142
|
0 |
0 |
unless $rc =~ /array/ |
144
|
0 |
0 |
if $root and $root eq $k |
145
|
0 |
0 |
ref $f eq 'ARRAY' ? : |
146
|
0 |
0 |
if ($sk and ref $f1 eq 'Regexp' && $k =~ /$f1/ || $k eq $f1) |
147
|
0 |
0 |
if (not defined $f2 or (ref $f2 eq 'Regexp' and $$p{$k} =~ /$f2/ or $$p{$k} eq $f2)) |
150
|
0 |
0 |
if ($rc) { } |
151
|
0 |
0 |
if ($root) { } |
152
|
0 |
0 |
if $rr |
157
|
0 |
0 |
if $rk |
158
|
0 |
0 |
if $rv |
162
|
0 |
0 |
if (my(@r) = _datasearch($$p{$k}, $f, $sk, $sv, $rv, $rk, $rc, $refs, $container, $k, $rr, $depth + 1)) |
168
|
0 |
0 |
unless $rc =~ /hash/ |
170
|
0 |
0 |
if (my(@r) = _datasearch($_, $f, $sk, $sv, $rv, $rk, $rc, $refs, $container, $key, $rr, $depth + 1)) |
177
|
0 |
0 |
if ($rc) { } |
178
|
0 |
0 |
if ($root) { } |
179
|
0 |
0 |
if $rr |
184
|
0 |
0 |
if $rv |
185
|
0 |
0 |
if $rk and defined $key |
195
|
0 |
0 |
ref $_[0] eq 'ARRAY' ? : |
197
|
0 |
0 |
unless @_ / 2 == int @_ / 2 |
206
|
0 |
0 |
if ($valid_arg_list) |
208
|
0 |
0 |
unless grep /^\Q$arg\E$/, @$valid_arg_list |