| line |
true |
false |
branch |
|
117
|
19 |
90 |
if (exists $meta->{'seen'}{$refaddr}) |
|
119
|
0 |
19 |
is_coderef($cycle) ? : |
|
124
|
1 |
18 |
if $lcycle eq "truncate" |
|
125
|
1 |
17 |
if $lcycle eq "die" |
|
128
|
0 |
17 |
unless $lcycle eq "continue" |
|
152
|
0 |
110 |
unless --$revisit_limit |
|
161
|
62 |
48 |
if ($is_hashref) { } |
|
162
|
56 |
2 |
$sort_key_mode == 1 ? : |
|
|
4 |
58 |
if ($sort_key_mode == 0) { } |
|
169
|
2 |
46 |
$sort_idx_mode == 0 ? : |
|
181
|
117 |
115 |
$is_hashref ? : |
|
183
|
54 |
142 |
is_plain_arrayref($$vref) ? : |
|
|
36 |
196 |
is_plain_hashref($$vref) ? : |
|
191
|
9 |
223 |
if ($visit_element and (my $result = &$code($kydx, $vref, $context, \%meta)) != 2) |
|
197
|
2 |
7 |
if $result == 4 |
|
198
|
2 |
5 |
if $result == 1 |
|
199
|
1 |
4 |
if $result == 32 |
|
203
|
3 |
1 |
if $result & 16 |
|
207
|
0 |
1 |
if not $revisit_element and !$result & 2 |
|
211
|
141 |
83 |
unless is_plain_refref($vref) |
|
214
|
83 |
0 |
if (is_plain_arrayref($ref) or is_plain_hashref($ref)) |
|
216
|
22 |
58 |
if $result == 1 |
|
217
|
1 |
57 |
if $result == 32 |
|
218
|
1 |
56 |
if ($revisit_element) |
|
221
|
0 |
1 |
if $result == 1 |
|
222
|
0 |
1 |
if $result == 32 |
|
223
|
0 |
1 |
if $result & '18446744073709551609' |
|
229
|
1 |
78 |
if $rescan_container |
|
231
|
0 |
78 |
unless $revisit_limit |
|
247
|
0 |
6 |
unless --$revisit_limit |
|
251
|
1 |
5 |
if $result == 32 |
|
253
|
1 |
4 |
if $result == 1 |
|
254
|
1 |
3 |
if $result == 16 |
|
258
|
0 |
3 |
if not $revisit_element and !$result & 2 |
|
262
|
0 |
3 |
if $status == 1 |
|
264
|
1 |
2 |
if ($revisit_element) |
|
267
|
0 |
1 |
if $result == 1 |
|
268
|
1 |
0 |
if $result == 2 |
|
272
|
0 |
2 |
unless $revisit_limit |
|
283
|
0 |
27 |
unless is_coderef($callback) |
|
289
|
1 |
26 |
if (defined(my $sort_keys = delete $opts{'sort_keys'})) |
|
291
|
0 |
1 |
if defined $opts{'key_sort'} |
|
297
|
1 |
0 |
is_coderef($sort_keys) ? : |
|
303
|
0 |
27 |
if defined $opts{'revisit_limit'} and not &looks_like_number($opts{'revisit_limit'}) && floor($opts{'revisit_limit'}) == $opts{'revisit_limit'} |
|
324
|
1 |
1 |
$key_sort ? : |
|
|
2 |
2 |
is_coderef($key_sort) ? : |
|
|
4 |
23 |
defined $key_sort ? : |
|
332
|
1 |
26 |
defined $idx_sort && is_coderef($idx_sort) ? : |
|
337
|
5 |
22 |
if $visit == 8 |
|
339
|
0 |
27 |
unless $cycle =~ /\A die|continue|truncate \z/u |
|
342
|
0 |
27 |
if %opts |
|
350
|
5 |
22 |
if ($visit & 8) { } |
|
356
|
0 |
23 |
unless --$revisit_limit |
|
358
|
21 |
1 |
unless $completed == 32 |
|
360
|
0 |
21 |
unless $revisit_limit |