lib/Data/Hash/DotNotation.pm | |||
---|---|---|---|
Criterion | Covered | Total | % |
branch | 10 | 14 | 71.4 |
line | true | false | branch |
---|---|---|---|
44 | 1 | 3 | unless my $name = shift() |
54 | 1 | 4 | unless my $name = shift() |
75 | 0 | 0 | if (ref $data->{$section} eq 'HASH') { } |
94 | 2 | 0 | if (ref $data->{$section} eq 'HASH') { } |
101 | 2 | 1 | if ($data and exists $data->{$node}) |
113 | 0 | 4 | unless ($self->data) |
126 | 3 | 1 | if (defined $value) { } |