line |
true |
false |
branch |
34
|
0 |
1 |
unless my $gzwrite = &Compress::Zlib::gzopen("$survey_datadump_dir/_data_dump.perl.gz", 'wb') |
60
|
0 |
2 |
if ($packages{$pkg} and $packages{$pkg} ne $line) |
61
|
0 |
0 |
if $verbose |
97
|
0 |
1 |
unless ($dp->{$token_pkg}) |
98
|
0 |
0 |
if (my $keypkg = $self->{'irregularities'}{$di->dist}) { } |
110
|
0 |
0 |
unless $token_package{$b} <=> $token_package{$a} |
144
|
1 |
0 |
if $mirror_status->{'success'} |
146
|
0 |
1 |
if (not $mirror_status->{'success'}) { } |
147
|
0 |
0 |
$mirror_status->{'status'} == 599 ? : |
149
|
0 |
0 |
if (-f $destfile) { } |
161
|
0 |
1 |
if $verbose |
167
|
0 |
1 |
unless (keys %$mods_in_rel) |
188
|
0 |
2 |
if (my $pvr = $self->{'pkg_ver_rel'}{$pkg}) |
190
|
0 |
0 |
if ($p_r_match_score < $pvr->{'p_r_match_score'}) |
201
|
1 |
0 |
exists $ri->{'url'} ? : |
213
|
2 |
2 |
if not defined $p[$i] && defined $r[$i] or $p[$i] ne $r[$i] |
226
|
1 |
0 |
unless -f $packages_file |
228
|
0 |
0 |
unless my $gzread = &Compress::Zlib::gzopen($packages_file, 'rb') |
236
|
0 |
0 |
if ($inheader) |
237
|
0 |
0 |
unless $package =~ /\S/ |
253
|
0 |
1 |
unless my $gzwrite = &Compress::Zlib::gzopen($packages_file, 'wb') |
280
|
0 |
1 |
unless $url =~ s[.* \b authors/id/ ][]x |
288
|
0 |
2 |
unless defined $version |
290
|
0 |
2 |
if $fw < length $module |