blib/lib/Class/Accessor/Array.pm | |||
---|---|---|---|
Criterion | Covered | Total | % |
branch | 17 | 30 | 56.6 |
line | true | false | branch |
---|---|---|---|
25 | 0 | 3 | unless exists $spec->{'accessors'} |
35 | 2 | 0 | if @_ > 1 |
4 | 0 | if @_ > 1 | |
1 | 0 | if @_ > 1 | |
1 | 0 | if @_ > 1 | |
4 | 0 | if @_ > 1 | |
36 | 0 | 5 | if $@ |
43 | 1 | 2 | if (@{"${class}::ISA";}) { } |
57 | 3 | 0 | unless (*{"${class}::$constructor";}{'CODE'}) |
58 | 0 | 2 | if keys %args |
0 | 0 | unless $_ eq 'bar' | |
0 | 1 | if keys %args | |
4 | 2 | unless $_ eq 'foo' | |
2 | 4 | if keys %args | |
59 | 0 | 3 | if $@ |