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