line |
true |
false |
branch |
40
|
0 |
21 |
if (UNIVERSAL::isa($invocant, "CODE")) |
43
|
0 |
21 |
unless $routine |
44
|
8 |
13 |
if (&Scalar::Util::blessed($invocant)) |
47
|
3 |
10 |
if (ref $invocant eq "SCALAR") |
51
|
10 |
0 |
if (my $routine = $package->can($routine)) |
54
|
0 |
0 |
if ($package->can("AUTOLOAD")) |
62
|
0 |
1 |
unless @_ |
63
|
1 |
0 |
ref $_[0] ? : |
69
|
0 |
3 |
unless $invocant |
70
|
2 |
5 |
ref $_ eq 'ARRAY' ? : |
84
|
8 |
2 |
if ($cached->{$package}) |
88
|
0 |
2 |
if ($package eq "main") |
95
|
2 |
0 |
unless $failed |
99
|
2 |
0 |
unless $loaded |
100
|
2 |
0 |
unless $loaded |
105
|
0 |
0 |
$error ? : |
|
0 |
2 |
if $error or $failed or not $loaded |
117
|
0 |
6 |
unless @_ |
136
|
0 |
7 |
unless $package |
141
|
4 |
13 |
@_ ? : |