lib/accessors/fast.pm | |||
---|---|---|---|
Criterion | Covered | Total | % |
condition | 9 | 21 | 42.8 |
line | !l | l&&!r | l&&r | condition |
---|---|---|---|---|
118 | 0 | 3 | 0 | eval ' use Class::Accessor::Fast::XS; 1 ' and do { 'base'->import('Class::Accessor::Fast::XS'); 1 } |
0 | 0 | 0 | eval { do { require Class::Accessor::Fast; 1 } } and do { 'base'->import('Class::Accessor::Fast'); 1 } | |
147 | 0 | 41 | 94 | $_ ne $pkg && $_->can('field_list') |
181 | 2 | 0 | 0 | @_ == 1 && ref $_[0] |
line | l | !l&&r | !l&&!r | condition |
---|---|---|---|---|
118 | 2 | 0 | 0 | eval ' use Class::Accessor::Fast::XS; 1 ' and do { 'base'->import('Class::Accessor::Fast::XS'); 1 } or eval { do { require Class::Accessor::Fast; 1 } } and do { 'base'->import('Class::Accessor::Fast'); 1 } |
141 | 2 | 117 | 0 | ref $self || $self |
143 | 115 | 4 | 0 | $CLASS{$pkg}{'isa'} ||= do { no strict 'refs'; \@{$pkg . '::ISA';} } |