line |
true |
false |
branch |
17
|
21 |
41 |
unless @_ |
21
|
52 |
6 |
if defined $_ |
23
|
18 |
23 |
if exists $$h{'none'} or exists $$h{''} |
27
|
14 |
9 |
if exists $$h{'autoload'} and shift(), 1 or exists $$h{'all'} and shift() |
30
|
14 |
9 |
if exists $$h{'load'} and shift(), 1 or exists $$h{'all'} |
33
|
11 |
12 |
if exists $$h{'load_remote'} and shift(), 1 or exists $$h{'all'} |
36
|
11 |
12 |
if exists $$h{'autoload_remote'} and shift(), 1 or exists $$h{'all'} |
55
|
1 |
8 |
if $@ |
62
|
1 |
6 |
if $@ |
66
|
19 |
25 |
if my $autoimport = $_[0] eq 'autoimport' |
67
|
0 |
44 |
unless my $mod = shift() |
70
|
1 |
43 |
if (_is_file($mod)) { } |
78
|
9 |
39 |
$@ ? : |
80
|
4 |
0 |
if $err |
91
|
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 |
/^\./ ? : |