blib/lib/Data/Hopen/Class.pm | |||
---|---|---|---|
Criterion | Covered | Total | % |
branch | 10 | 10 | 100.0 |
line | true | false | branch |
---|---|---|---|
46 | 1 | 15 | unless my $class = shift() |
48 | 3 | 12 | if (@_ == 1 and ref $_[0] eq 'HASH') { } |
1 | 11 | elsif (@_ == 1 and ref $_[0]) { } | |
1 | 10 | elsif (@_ % 2) { } | |
61 | 6 | 6 | unless /^-/ |