| blib/lib/Hash/Layout/Level.pm | |||
|---|---|---|---|
| Criterion | Covered | Total | % |
| branch | 13 | 14 | 92.8 |
| line | true | false | branch |
|---|---|---|---|
| 46 | 3 | 16 | if $self->registered_keys and $self->registered_keys->{$key} |
| 49 | 482 | 3282 | unless my $del = $self->delimiter |
| 50 | 3036 | 246 | unless $key =~ /\Q$del\E/ |
| 52 | 6 | 240 | unless $peeled and $peeled ne '' |
| 53 | 192 | 48 | $leftover && $leftover ne '' && wantarray ? : |
| 59 | 1 | 78 | ref $_[0] eq 'ARRAY' ? : |
| 0 | 79 | $_[0] && !ref($_[0]) ? : |