| line |
true |
false |
branch |
|
24
|
0 |
12 |
if (keys %arg_for) |
|
29
|
5 |
7 |
if ($maybe_to) |
|
30
|
1 |
4 |
if ($delegate) |
|
34
|
0 |
4 |
if ($if_true) |
|
41
|
1 |
10 |
unless $delegate |
|
42
|
1 |
9 |
unless $methods |
|
45
|
0 |
8 |
if (defined $else_return and not defined $if_true) |
|
51
|
5 |
3 |
if defined $if_true |
|
58
|
7 |
2 |
if ($if_true) { } |
|
59
|
0 |
7 |
if ($args) { } |
|
62
|
0 |
0 |
if ($self->$if_true) |
|
65
|
0 |
0 |
defined $else_return ? : |
|
71
|
2 |
3 |
if ($self->$if_true) |
|
74
|
1 |
2 |
defined $else_return ? : |
|
79
|
1 |
1 |
if ($args) { } |
|
95
|
0 |
9 |
if (not $override and defined *{"${package}::$method";}{'CODE'}) |
|
108
|
2 |
7 |
if ('ARRAY' eq ref $methods) { } |
|
|
3 |
4 |
elsif (not ref $methods) { } |
|
|
1 |
3 |
elsif ('HASH' ne ref $methods) { } |
|
118
|
0 |
8 |
unless (keys %$methods) |
|
138
|
31 |
1 |
if ($name =~ /^[a-z_][a-z0-9_]*$/i) |