line |
true |
false |
branch |
90
|
59 |
0 |
if (defined $ua) { } |
|
0 |
0 |
elsif (defined $wget) { } |
|
0 |
0 |
elsif (defined $curl) { } |
92
|
55 |
4 |
if %$headers |
93
|
55 |
4 |
if defined $content |
95
|
0 |
59 |
unless ($response->{'success'}) |
96
|
0 |
0 |
if $response->{'status'} == 599 |
103
|
0 |
0 |
if defined $content |
108
|
0 |
0 |
if defined $content |
136
|
0 |
0 |
unless open $locking_file, '>', "$memoize_file.lock" |
138
|
0 |
0 |
unless flock $locking_file, 2 |
139
|
0 |
0 |
unless tie %memoize_cache, 'Dist::Surveyor::DB_File', $memoize_file, 66, 416 |
292
|
0 |
7 |
unless defined $version |
293
|
0 |
7 |
$is_fallback ? : |
304
|
5 |
2 |
ref $version && $version->isa('version') ? : |
320
|
0 |
7 |
if @$hits >= $metacpan_size |
323
|
0 |
7 |
if grep {not $_->{'fields'}{'release'};} @$hits |
340
|
0 |
7 |
if $VERBOSE |