blib/lib/mop/role.pm | |||
---|---|---|---|
Criterion | Covered | Total | % |
condition | 22 | 32 | 68.7 |
line | !l | l&&!r | l&&r | condition |
---|---|---|---|---|
178 | 345 | 10 | 8 | $self->required_methods and not $self->is_abstract |
189 | 82 | 0 | 355 | $self->isa('mop::class') and defined $self->superclass |
212 | 16 | 4 | 555 | ref $method eq 'mop::method' && !$method->has_events |
line | l | !l | condition |
---|---|---|---|
21 | 7192 | 0 | $name{$_[0]} // \(undef) |
22 | 420 | 23 | $version{$_[0]} // \(undef) |
23 | 0 | 1 | $authority{$_[0]} // \(undef) |
24 | 1385 | 0 | $roles{$_[0]} // \(undef) |
25 | 11194 | 0 | $attributes{$_[0]} // \(undef) |
26 | 29393 | 0 | $methods{$_[0]} // \(undef) |
27 | 18209 | 0 | $required_methods{$_[0]} // \(undef) |
40 | 0 | 6 | $args{'roles'} || [] |
67 | 0 | 12 | $args{'methods'} //= {map({$_, $$methods{$_}->clone;} keys %$methods)} |
72 | 0 | 12 | $args{'attributes'} //= {map({$_, $$attributes{$_}->clone;} keys %$attributes)} |
line | l | !l&&r | !l&&!r | condition |
---|---|---|---|---|
96 | 44 | 8 | 72 | $role->name eq $name or $role->does_role($name) |