line |
true |
false |
branch |
44
|
12 |
309 |
unless (@path)
|
50
|
524 |
4 |
if (exists $ptr->{$entry}) { }
|
51
|
520 |
4 |
if (ref $ptr->{$entry} eq 'HASH') { }
|
71
|
6 |
63 |
unless defined $value
|
73
|
1 |
62 |
if (ref $value ne "")
|
74
|
0 |
1 |
unless $self->has_primary_attribute and ref $value eq "HASH"
|
78
|
0 |
1 |
unless defined $$value{$self->primary_attribute}
|
81
|
0 |
1 |
unless ref $$value{$self->primary_attribute} eq ""
|
95
|
0 |
2 |
unless defined $node
|
97
|
0 |
2 |
if (ref $node ne "ARRAY")
|
111
|
1 |
5 |
unless defined $node
|
113
|
0 |
5 |
if (ref $node ne "ARRAY")
|
127
|
0 |
14 |
unless defined $node
|
129
|
0 |
14 |
if (ref $node ne "HASH")
|
143
|
1 |
5 |
unless defined $node
|
145
|
0 |
5 |
if (ref $node ne "HASH")
|
160
|
100 |
103 |
unless (defined $node)
|
167
|
36 |
67 |
if (ref $node eq '') { }
|
|
23 |
44 |
elsif (ref $node eq 'SCALAR') { }
|
|
5 |
39 |
elsif (ref $node eq 'ARRAY') { }
|
|
36 |
3 |
elsif (ref $node eq 'HASH') { }
|
|
3 |
0 |
elsif (&blessed($node) and $node->isa('Connector')) { }
|
207
|
4 |
1 |
if (not exists $ptr->{$entry}) { }
|
|
0 |
1 |
elsif (ref $ptr->{$entry} ne 'HASH') { }
|
217
|
1 |
8 |
unless (defined $value)
|
222
|
0 |
8 |
if (exists $ptr->{$entry})
|
223
|
0 |
0 |
if (ref $ptr->{$entry} ne ref $value)
|