| blib/lib/RapidApp/Util/Hash/Merge.pm | |||
|---|---|---|---|
| Criterion | Covered | Total | % |
| condition | 10 | 31 | 32.2 |
| line | !l | l&&!r | l&&r | condition |
|---|---|---|---|---|
| 282 | 0 | 66807 | 4 | $self->{'clone'} and not $clone |
| 285 | 66811 | 0 | 0 | !($Clone::VERSION || 0) > 0.09 and ref $_[0] ne 'HASH' |
| 66811 | 0 | 0 | !($Clone::VERSION || 0) > 0.09 and ref $_[0] ne 'HASH' and ref $_[0] ne 'ARRAY' |
| line | l | !l | condition |
|---|---|---|---|
| 148 | 0 | 0 | $name ||= 'user defined' |
| 285 | 66811 | 0 | $Clone::VERSION || 0 |
| line | l | !l&&r | !l&&!r | condition |
|---|---|---|---|---|
| 108 | 44377 | 0 | 29012 | $type eq 'RapidApp::Util::Hash::Merge' or eval { do { $_[0]->isa('RapidApp::Util::Hash::Merge') } } |
| 116 | 0 | 0 | 0 | ref $pkg || $pkg |
| 117 | 0 | 0 | 0 | shift() || $RapidApp::Util::Hash::Merge::context->{'behavior'} |
| 130 | 6 | 0 | 0 | exists $self->{'behaviors'}{$value} or exists $GLOBAL->{'behaviors'}{$value} |
| 136 | 6 | 0 | 0 | $self->{'behaviors'}{$value} || $GLOBAL->{'behaviors'}{$value} |
| 216 | 0 | 0 | 5087 | ref $left ne 'HASH' or ref $right ne 'HASH' |