| line |
true |
false |
branch |
|
13
|
0 |
2 |
if $ENV{'AUTOLOAD_DEBUG'} |
|
14
|
0 |
2 |
if $ENV{'AUTOLOAD_LIB'} |
|
15
|
2 |
0 |
if ($lib =~ m[^[^/]]) |
|
26
|
16 |
0 |
if ($path =~ s[/+[^/]*$ ][]x) |
|
27
|
12 |
4 |
if -d $path |
|
29
|
0 |
4 |
if lstat $path |
|
30
|
4 |
0 |
if (mkbase($path)) |
|
31
|
0 |
4 |
if $ENV{'AUTOLOAD_DEBUG'} |
|
40
|
0 |
16 |
unless $url =~ m[^\w+://] |
|
43
|
4 |
11 |
if ($contents =~ /The document has moved /) |
|
45
|
0 |
4 |
if ($$recurse{$bounce} and $$recurse{$bounce} > 2) |
|
49
|
4 |
0 |
if $$recurse{'total'}++ < 20 |
|
58
|
0 |
11 |
if ($rel =~ m[http://] or not $last_fetched =~ m[^(http://[^/]+)(/?.*)]) |
|
63
|
4 |
7 |
if ($rel =~ m[^/]) |
|
76
|
0 |
7 |
if $ENV{'AUTOLOAD_DEBUG'} |
|
112
|
7 |
0 |
if ($write) |
|
115
|
0 |
7 |
unless open my $fh, '>', $write |
|
126
|
0 |
5 |
if (-f $cache_file) |
|
130
|
0 |
5 |
unless mkbase($cache_file) |
|
131
|
1 |
4 |
if $INC[-1] eq \&botstrap::inc |
|
133
|
5 |
0 |
if ($f =~ m[^([\w/]+)\.pm]) |
|
142
|
4 |
0 |
if ($search =~ /href="([^<>]+)">Browse
|
|
144
|
4 |
0 |
if (my $MANIFEST = fetch("$src/MANIFEST")) { } |
|
145
|
4 |
0 |
if $last_fetched =~ m[^(.*?)/+MANIFEST] |
|
146
|
2 |
2 |
if ($MANIFEST =~ m[^lib/]m) { } |
|
147
|
0 |
2 |
if $ENV{'AUTOLOAD_DEBUG'} |
|
150
|
0 |
6 |
if $ENV{'AUTOLOAD_DEBUG'} |
|
153
|
6 |
0 |
unless (-f $cache) |
|
160
|
0 |
2 |
if $ENV{'AUTOLOAD_DEBUG'} |
|
162
|
2 |
2 |
unless (-f $cache_file) |
|
164
|
2 |
0 |
if ($f =~ /(\w+\.pm)/) { } |
|
166
|
1 |
1 |
if ($MANIFEST =~ /^(.*$stub)$/m) { } |
|
173
|
0 |
1 |
if $ENV{'AUTOLOAD_DEBUG'} |
|
188
|
3 |
0 |
if (open my $fh, '<', $cache_file) |