| line |
true |
false |
branch |
|
33
|
0 |
21 |
if (not defined $path[0] or $path[0] eq '')
|
|
42
|
0 |
21 |
if (not ref $point) { }
|
|
|
15 |
6 |
elsif (ref $point eq 'HASH') { }
|
|
|
5 |
1 |
elsif (ref $point eq 'ARRAY') { }
|
|
|
1 |
0 |
elsif (&blessed($point) and $point->can($item)) { }
|
|
61
|
0 |
9 |
wantarray ? :
|
|
|
9 |
12 |
unless @path
|
|
72
|
6 |
27 |
if (not $path and defined $point)
|
|
76
|
26 |
7 |
$path ? :
|
|
78
|
31 |
2 |
if ($point)
|
|
79
|
1 |
30 |
if (not ref $point) { }
|
|
|
23 |
7 |
elsif (ref $point eq 'HASH') { }
|
|
|
5 |
2 |
elsif (ref $point eq 'ARRAY') { }
|
|
|
1 |
1 |
elsif (&blessed($point) and eval {
do {
%{$point;}
}
}) { }
|
|
85
|
20 |
38 |
if ref $point->{$key}
|
|
91
|
4 |
6 |
if ref $point->[$i]
|
|
97
|
1 |
0 |
if ref $point->{$key}
|
|
109
|
11 |
7 |
if $required{$module}++
|
|
112
|
5 |
2 |
if 'Class::Inspector'->loaded($module)
|
|
120
|
1 |
1 |
if (my $e = $@)
|