| line |
true |
false |
branch |
|
44
|
0 |
0 |
unless $root |
|
47
|
0 |
0 |
if scalar @keys < 1 |
|
54
|
0 |
0 |
if defined $value |
|
57
|
0 |
0 |
unless $search_upwards_while_not_defined |
|
86
|
0 |
0 |
if (reftype($datum) eq 'ARRAY' and $on_ArrayRef =~ /^flatten|dereference$/io) { } |
|
|
0 |
0 |
elsif (reftype($datum) eq 'HASH' and $on_HashRef =~ /^flatten|dereference$/io) { } |
|
|
0 |
0 |
elsif (reftype($datum) eq 'SCALAR' and $on_ScalarRef =~ /^flatten|dereference$/io) { } |
|
123
|
0 |
0 |
defined $$opts{'remove_extra_separators'} ? : |
|
124
|
0 |
0 |
defined $$opts{'remove_leading_separator'} ? : |
|
125
|
0 |
0 |
defined $$opts{'remove_trailing_separator'} ? : |
|
126
|
0 |
0 |
defined $$opts{'remove_empty_segments'} ? : |
|
127
|
0 |
0 |
defined $$opts{'try_avoiding_repeated_segments'} ? : |
|
138
|
0 |
0 |
defined $$opts{'path'} && ($keys eq $$opts{'path'} || $keys == $$opts{'path'}) ? : |
|
146
|
0 |
0 |
if (reftype($key) eq 'HASH') { } |
|
160
|
0 |
0 |
unless scalar @segs |
|
163
|
0 |
0 |
if ($use_path_semantics) |
|
166
|
0 |
0 |
if $remove_extra_separators |
|
167
|
0 |
0 |
if $remove_leading_separator |
|
168
|
0 |
0 |
if $remove_trailing_separator |
|
174
|
0 |
0 |
if $lc |
|
175
|
0 |
0 |
if $trim |
|
178
|
0 |
0 |
if ($try_avoiding_repeated_segments) |
|
181
|
0 |
0 |
if (array1_starts_with_array2([@accumulated_segs], [@segs])) |
|
192
|
0 |
0 |
if _is_absolute_data_key_reference(@accumulated_segs) |
|
198
|
0 |
0 |
if $remove_empty_segments |
|
203
|
0 |
0 |
wantarray ? : |
|
221
|
0 |
0 |
unless $segment |
|
226
|
0 |
0 |
if ($element =~ /^([^\[]*)\[(\d+)\]$/) { } |
|
235
|
0 |
0 |
unless (reftype($data)) |
|
240
|
0 |
0 |
if (reftype($data) eq 'SCALAR') |
|
246
|
0 |
0 |
if (reftype($data) eq 'ARRAY') |
|
247
|
0 |
0 |
if (defined $index and not defined $element) { } |
|
|
0 |
0 |
elsif (not defined $element) { } |
|
248
|
0 |
0 |
if (exists $$data[$index]) { } |
|
263
|
0 |
0 |
if (reftype($data) eq 'HASH') |
|
266
|
0 |
0 |
if (exists $$data{$segment}) |
|
272
|
0 |
0 |
unless (exists $$data{$element}) |
|
275
|
0 |
0 |
if (reftype($$data{$element}) eq 'ARRAY') { } |
|
276
|
0 |
0 |
if (not defined $index) { } |
|
282
|
0 |
0 |
if (exists $$data{$element}[$index]) { } |