| line |
true |
false |
branch |
|
17
|
4 |
22 |
if (my $error = $class->_validate(%param)) |
|
57
|
5 |
13 |
if (my $error = $self->_validate_overriding($name, $new_sub)) |
|
86
|
3 |
23 |
unless length $package |
|
88
|
22 |
1 |
if _is_package_loaded($package) |
|
96
|
1 |
17 |
unless length $name |
|
98
|
1 |
16 |
unless ($self->package->can($name)) |
|
102
|
2 |
14 |
unless ($new_sub) |
|
106
|
13 |
1 |
if _is_coderef($new_sub) |
|
153
|
0 |
13 |
if exists $originals->{$name} |
|
183
|
0 |
13 |
if $self->_get_original($name) |
|
199
|
16 |
5 |
if (my $first_argument = $arguments[0]) |
|
209
|
14 |
2 |
if ($is_class_or_object) |
|
220
|
4 |
17 |
if ($self->want_array) |
|
229
|
9 |
12 |
if (not defined $want_array) { } |
|
|
7 |
5 |
elsif ($want_array) { } |
|
318
|
4 |
6 |
if ($self->want_array) |
|
332
|
13 |
1 |
if $reftype eq "CODE" |
|
343
|
22 |
1 |
if %{$package;} |