| line |
true |
false |
branch |
|
74
|
0 |
0 |
$meta ? : |
|
80
|
0 |
0 |
if (not defined $index_file && -e $index_file or -z $index_file or not $index_url->isa('URI::file')) |
|
89
|
0 |
0 |
unless my $fh = zopen($index_file) |
|
92
|
0 |
0 |
if $line eq "\n" |
|
99
|
0 |
0 |
unless $installed{$pkg} |
|
100
|
0 |
0 |
if $version eq 'undef' |
|
103
|
0 |
0 |
if $seen{$dist} |
|
107
|
0 |
0 |
unless $version =~ /[0-9]/ |
|
110
|
0 |
0 |
if $exclude_core and exists $core_modules->{$pkg} |
|
112
|
0 |
0 |
if $dist =~ m[/perl-[0-9._]+\.tar\.(gz|bz2)$] |
|
114
|
0 |
0 |
unless my $inst_version = installed_version_for($pkg, \@inc) |
|
117
|
0 |
0 |
if (compare_version($inst_version, $version)) |
|
119
|
0 |
0 |
if ($verbose) { } |
|
|
0 |
0 |
elsif ($print_package) { } |
|
134
|
2 |
5 |
if $inst_version eq $version |
|
139
|
3 |
2 |
$inst_version_obj < $version_obj ? : |
|
161
|
0 |
0 |
if (defined $fname) { } |
|
163
|
0 |
0 |
if (-s $fname) { } |
|
187
|
0 |
0 |
if ($response->{'status'} == 599) { } |
|
|
0 |
0 |
elsif (not $response->{'success'}) { } |
|
206
|
0 |
0 |
if ($base) { } |
|
212
|
0 |
0 |
if ($self_contained) { } |