| lib/Data/Hash/DotNotation.pm | |||
|---|---|---|---|
| Criterion | Covered | Total | % |
| condition | 6 | 11 | 54.5 |
| line | !l | l&&!r | l&&r | condition |
|---|---|---|---|---|
| 64 | 0 | 2 | 0 | $data and my $section = shift @parts |
| 84 | 0 | 3 | 2 | $data and my $section = shift @parts |
| 92 | 0 | 1 | 2 | $data and exists $$data{$node} |
| line | l | !l | condition |
|---|---|---|---|
| 113 | 0 | 2 | $$current_location{$section} //= {} |