line |
true |
false |
branch |
18
|
15 |
84 |
'CODE' eq ref $_[0] ? : |
30
|
6 |
516 |
unless defined $root_path |
33
|
514 |
2 |
unless (&reftype($path_sep) // "") eq "REGEXP" |
41
|
9 |
507 |
unless @root_parts |
44
|
865 |
878 |
if (ref $current_ref eq 'HASH') { } |
|
870 |
8 |
elsif (ref $current_ref eq 'ARRAY') { } |
45
|
860 |
5 |
if (exists $current_ref->{$current_part}) |
51
|
5 |
865 |
unless $current_part =~ /^\d+$/ |
53
|
860 |
5 |
if (exists $current_ref->[$current_part]) |
74
|
15 |
552 |
unless defined $root_path |
77
|
551 |
1 |
unless (&reftype($path_sep) // "") eq "REGEXP" |
85
|
18 |
534 |
unless @root_parts |
91
|
648 |
652 |
if (ref $current_ref eq 'HASH') { } |
|
641 |
11 |
elsif (ref $current_ref eq 'ARRAY') { } |
92
|
32 |
616 |
unless (ref $current_ref->{$current_part}) |
96
|
8 |
24 |
if $current_part =~ /^\d+$/ |
98
|
0 |
24 |
$next_part =~ /^\d+$/ ? : |
108
|
8 |
633 |
unless $current_part =~ /^\d+$/ |
110
|
16 |
617 |
unless (ref $current_ref->[$current_part]) |
111
|
16 |
0 |
$next_part =~ /^\d+$/ ? : |
127
|
248 |
259 |
if (ref $current_ref eq "HASH") |
131
|
256 |
3 |
if (ref $current_ref eq "ARRAY") |
132
|
6 |
250 |
unless $last_part =~ /^\d+$/ |