line |
true |
false |
branch |
128
|
0 |
5 |
unless defined $ref and not &blessed($ref) and $type =~ /HASH|ARRAY/u
|
140
|
0 |
90 |
if &blessed($ref)
|
142
|
3 |
55 |
unless $type =~ /HASH|ARRAY/u
|
145
|
5 |
50 |
unless (&blessed($path))
|
153
|
0 |
55 |
if $path->step_count > 255
|
157
|
40 |
15 |
$type eq 'HASH' ? :
|
159
|
50 |
35 |
$type eq 'HASH' ? :
|
169
|
15 |
79 |
unless defined $$newhash{$_}
|
185
|
10 |
32 |
unless (defined $root)
|
196
|
0 |
32 |
if $err
|
213
|
42 |
115 |
$i == $path->step_count - 1 ? :
|
216
|
34 |
8 |
$$hash_step{'type'} eq 'HASH' ? :
|
|
42 |
115 |
unless $i
|
220
|
115 |
42 |
if $next_step
|
225
|
65 |
92 |
if ($type_str eq 'HH') { }
|
|
14 |
78 |
elsif ($type_str eq 'HA') { }
|
|
16 |
62 |
elsif ($type_str eq 'AH') { }
|
|
20 |
42 |
elsif ($type_str eq 'AA') { }
|
|
36 |
6 |
elsif ($type_str eq 'H') { }
|
|
6 |
0 |
elsif ($type_str eq 'A') { }
|