| line |
true |
false |
branch |
|
25
|
49341 |
43222 |
if @args % 2 == 1
|
|
30
|
2 |
92561 |
if (&blessed($code) and $code->isa('Class::MOP::Method')) { }
|
|
|
7 |
92554 |
elsif (not ref $code or 'CODE' ne &reftype($code)) { }
|
|
44
|
4 |
92550 |
unless $params{'package_name'} and $params{'name'}
|
|
51
|
75560 |
16990 |
if $self->{'associated_metaclass'}
|
|
59
|
9762 |
25886 |
if $class ne "Class::MOP::Method"
|
|
62
|
25886 |
0 |
@_ == 1 ? :
|
|
105
|
15 |
15 |
$self->original_method ? :
|
|
113
|
3 |
3 |
$self->original_method ? :
|
|
121
|
7 |
6 |
$self->original_method ? :
|
|
139
|
24810 |
5 |
if $clone->{'associated_metaclass'}
|