| line |
true |
false |
branch |
|
25
|
48107 |
42197 |
if @args % 2 == 1
|
|
30
|
2 |
90302 |
if (&blessed($code) and $code->isa('Class::MOP::Method')) { }
|
|
|
7 |
90295 |
elsif (not ref $code or 'CODE' ne &reftype($code)) { }
|
|
44
|
4 |
90291 |
unless $params{'package_name'} and $params{'name'}
|
|
51
|
73695 |
16596 |
if $self->{'associated_metaclass'}
|
|
59
|
9500 |
25217 |
if $class ne "Class::MOP::Method"
|
|
62
|
25217 |
0 |
@_ == 1 ? :
|
|
105
|
15 |
15 |
$self->original_method ? :
|
|
113
|
3 |
3 |
$self->original_method ? :
|
|
121
|
7 |
6 |
$self->original_method ? :
|
|
139
|
24549 |
5 |
if $clone->{'associated_metaclass'}
|