line |
true |
false |
branch |
37
|
3 |
19 |
if (blessed $data and $data->can($toPackedMethodName)) |
43
|
18 |
4 |
if (reftype $data) |
44
|
11 |
7 |
if (reftype $data eq 'HASH') { } |
|
7 |
0 |
elsif (reftype $data eq 'ARRAY') { } |
60
|
8 |
2 |
if ($newVal) |
64
|
8 |
3 |
if (blessed $hash) |
65
|
6 |
2 |
$$options{'magicString'} ? : |
80
|
4 |
2 |
if ($newVal) |
84
|
5 |
2 |
if (blessed $array) |
85
|
3 |
2 |
$$options{'magicString'} ? : |
103
|
8 |
4 |
if (reftype $data eq 'HASH') { } |
|
4 |
0 |
elsif (reftype $data eq 'ARRAY') { } |
114
|
6 |
2 |
if ($class) |
116
|
2 |
4 |
if ($class->can($fromPackedMethodName)) |
123
|
0 |
5 |
if defined $newVal |
131
|
3 |
1 |
if (scalar @$array >= 2 and $$array[0] eq $$options{'magicString'}) |
135
|
1 |
2 |
if ($class->can($fromPackedMethodName)) |
142
|
0 |
2 |
if defined $newVal |
152
|
8 |
3 |
if (not exists $$options{'magicString'}) |