blib/lib/Object/InsideOut/attributes.pm | |||
---|---|---|---|
Criterion | Covered | Total | % |
branch | 7 | 10 | 70.0 |
line | true | false | branch |
---|---|---|---|
16 | 1 | 0 | if (exists $GBL->{'attr'}{'MOD'}{'SCALAR'}) |
21 | 0 | 1 | if (@attrs and 'Attribute::Handlers::UNIVERSAL'->can('MODIFY_SCALAR_ATTRIBUTES')) |
37 | 4 | 3 | if (my $handler = $GBL->{'attr'}{'MOD'}{$type}{$class}) |
40 | 1 | 3 | unless @attrs |
53 | 1 | 0 | if (exists $GBL->{'attr'}{'FETCH'}{$type}) |