| line |
true |
false |
branch |
|
29
|
14 |
3414 |
if (scalar @_ == 1) { }
|
|
|
0 |
3414 |
elsif (@_ % 2) { }
|
|
30
|
3 |
11 |
unless (defined $_[0] and ref $_[0] eq "HASH")
|
|
50
|
2421 |
30 |
unless $_[0]->can("BUILD")
|
|
52
|
2 |
28 |
if $params->{'__no_BUILD__'}
|
|
65
|
3363 |
56 |
unless $self->can("DEMOLISH")
|
|
68
|
55 |
1 |
if (my $meta = Class::MOP::class_of($self)) { }
|
|
82
|
61 |
58 |
if defined $demolish
|
|
108
|
379 |
0 |
'UNIVERSAL'->can('DOES') ? :
|
|
122
|
3 |
537 |
unless defined $role_name
|
|
124
|
212 |
325 |
if $meta->can("does_role") and $meta->does_role($role_name)
|
|
131
|
0 |
0 |
if @_
|