| line |
true |
false |
branch |
|
18
|
21 |
41 |
unless @_ |
|
22
|
52 |
6 |
if defined $_ |
|
24
|
18 |
23 |
if exists $h->{'none'} or exists $h->{''} |
|
28
|
14 |
9 |
if exists $h->{'autoload'} and shift(), 1 or exists $h->{'all'} and shift() |
|
31
|
14 |
9 |
if exists $h->{'load'} and shift(), 1 or exists $h->{'all'} |
|
34
|
11 |
12 |
if exists $h->{'load_remote'} and shift(), 1 or exists $h->{'all'} |
|
37
|
11 |
12 |
if exists $h->{'autoload_remote'} and shift(), 1 or exists $h->{'all'} |
|
56
|
1 |
8 |
if $@ |
|
63
|
1 |
6 |
if $@ |
|
67
|
19 |
25 |
if my $autoimport = $_[0] eq 'autoimport' |
|
68
|
0 |
44 |
unless my $mod = shift() |
|
71
|
1 |
43 |
if (_is_file($mod)) { } |
|
79
|
9 |
39 |
$@ ? : |
|
81
|
4 |
0 |
if $err |
|
92
|
26 |
14 |
if @_ || $autoimport and $import = $mod->can('import') |
|
110
|
2 |
51 |
if @parts and not $parts[0] |
|
113
|
0 |
53 |
$^O eq 'MSWin32' ? : |
|
117
|
46 |
7 |
if $pm |
|
124
|
0 |
53 |
if $^O eq 'VMS' |
|
133
|
1 |
43 |
/[^\w:']/ ? : |
|
|
0 |
44 |
/^\./ ? : |