| line |
true |
false |
branch |
|
46
|
0 |
4 |
unless ($package =~ /^\w+(?:::\w+)*$/) |
|
54
|
0 |
8 |
unless ($subroutine =~ /^[_[:alpha:]][[:word:]]*$/) |
|
61
|
0 |
1 |
unless $packages |
|
62
|
0 |
1 |
unless 'ARRAY' eq ref $packages |
|
69
|
0 |
3 |
if ($INC{$file} and $INC{$file} ne $message) { } |
|
85
|
0 |
1 |
unless $subs |
|
89
|
0 |
3 |
if (exists $$subs_installed{$sub}) |
|
93
|
0 |
3 |
unless ('CODE' eq ref $code) |
|
102
|
0 |
1 |
unless $chains |
|
107
|
0 |
1 |
unless (@methods) |
|
110
|
0 |
1 |
unless ('CODE' eq ref $code) |
|
139
|
0 |
1 |
unless $subs |
|
140
|
1 |
0 |
unless 'ARRAY' eq ref $subs |
|
151
|
0 |
1 |
if $@ |
|
161
|
0 |
0 |
if (@_ > 1) |
|
171
|
0 |
1 |
if (my $loaded = $self->is_package_loaded) |
|
178
|
1 |
0 |
if (@import) |
|
186
|
0 |
1 |
$self->import_on_use ? : |
|
191
|
0 |
1 |
if $@ |
|
206
|
1 |
0 |
unless ($self->import_on_use) |
|
211
|
0 |
1 |
if $@ |