| line |
true |
false |
branch |
|
89
|
0 |
14 |
ref $document ? : |
|
97
|
6 |
4 |
unless not %seen |
|
98
|
0 |
6 |
unless (%seen) = map({$final = $_;
$_, 1;} grep({$seen{$_} unless not %seen;} @each)) |
|
101
|
1 |
3 |
if wantarray |
|
122
|
0 |
14 |
if $DEBUG |
|
135
|
123 |
9 |
if (not ref $value) { } |
|
|
9 |
0 |
elsif (UNIVERSAL::isa($value, 'ARRAY')) { } |
|
138
|
3 |
120 |
if ($undef) { } |
|
146
|
0 |
9 |
unless @$value |
|
198
|
40 |
65 |
if (ref $val eq 'SCALAR') { } |
|
|
9 |
56 |
elsif (ref $val eq 'ARRAY') { } |
|
204
|
43 |
3 |
if (substr($cur, 0, 1) eq '{') { } |
|
|
3 |
0 |
elsif (substr($cur, 0, 1) eq '[') { } |
|
223
|
6 |
3 |
if @$val == 3 |
|
230
|
87 |
18 |
unless $prev == $idx |
|
232
|
11 |
87 |
if $prev == $idx |
|
234
|
10 |
4 |
if keys %seen == keys %$data |