blib/lib/Class/Member/HASH.pm | |||
---|---|---|---|
Criterion | Covered | Total | % |
branch | 18 | 22 | 81.8 |
line | true | false | branch |
---|---|---|---|
27 | 1 | 25 | unless (UNIVERSAL::isa($I, 'HASH')) |
31 | 2 | 23 | if ($#_ >= 0) |
45 | 1 | 1 | if (ref $parent) |
53 | 3 | 3 | if exists $o{$m} |
57 | 2 | 0 | if ($init) |
66 | 5 | 5 | if ($name =~ /^-(.*)/) { } |
68 | 3 | 2 | if ($o eq 'CLASS_MEMBERS') { } |
1 | 1 | elsif ($o =~ /^NEW=(.+)/) { } | |
0 | 1 | elsif ($o eq 'NEW') { } | |
0 | 1 | elsif ($o =~ /^INIT=(.+)/) { } | |
1 | 0 | elsif ($o eq 'INIT') { } |