| line |
true |
false |
branch |
|
21
|
0 |
0 |
unless ($role_type) |
|
27
|
0 |
0 |
unless (&first(sub {
$_ eq $req;
}
, _required_methods($role_type, $role))) |
|
38
|
0 |
3 |
exists $args{'methods'} ? : |
|
41
|
0 |
0 |
unless $role_type |
|
65
|
0 |
0 |
$class->can('new') ? : |
|
71
|
0 |
0 |
unless _derive_role_type($role) |
|
80
|
0 |
0 |
if ($role_type eq 'Moose::Role') { } |
|
|
0 |
0 |
elsif ($role_type eq 'Role::Tiny') { } |
|
85
|
0 |
0 |
if ($info and ref $info->{'requires'} eq 'ARRAY') |
|
90
|
0 |
0 |
wantarray ? : |
|
98
|
0 |
0 |
if ($role->can('meta') and $role->meta->isa('Moose::Meta::Role')) |
|
103
|
0 |
0 |
if (try_load_class('Role::Tiny') and _role_tiny_info($role)) |
|
125
|
0 |
0 |
if ($role_type eq 'Moose::Role') { } |
|
|
0 |
0 |
elsif ($role_type eq 'Role::Tiny') { } |
|
145
|
0 |
0 |
if $@ |
|
161
|
0 |
0 |
if $role_type eq 'Moose::Role' |
|
168
|
0 |
0 |
unless (ref $subref) |
|
173
|
0 |
0 |
if ($meta) { } |