| line |
true |
false |
branch |
|
70
|
0 |
0 |
if ($self->get_config->organize_dists) |
|
78
|
0 |
0 |
unless (defined $info) |
|
85
|
0 |
0 |
unless $$info{'dist_info'}{'module_info'} |
|
89
|
0 |
0 |
if eval {
do {
$version->can('numify')
}
} |
|
91
|
0 |
0 |
unless (defined $$module{'primary_package'}) |
|
98
|
0 |
0 |
if $Found_canonical{$$module{'primary_package'}} |
|
101
|
0 |
0 |
if $version < $Current_version{$$module{'primary_package'}} |
|
105
|
0 |
0 |
if $$module{'primary_package'} eq $$module{'module_name_from_file_guess'} |
|
111
|
0 |
0 |
if ($self->get_config->relative_paths_in_report) |
|
118
|
0 |
0 |
unless defined $dist_file |
|
128
|
0 |
0 |
if ($$info{'run_info'}{'completed'}) { } |
|
147
|
0 |
0 |
unless open my $fh, '>:utf8', $out_path |
|
161
|
0 |
0 |
unless -e $out_path |
|
171
|
0 |
0 |
unless open my $fh, '>:utf8', $out_path |
|
185
|
0 |
0 |
unless -e $out_path |
|
206
|
0 |
0 |
unless (eval {
do {
$self->create_index_files
}
}) |
|
254
|
0 |
0 |
unless (-e $file) |
|
260
|
0 |
0 |
unless (open my $fh, '<:utf8', $file) |
|
268
|
0 |
0 |
if /^\s*#/ |
|
272
|
0 |
0 |
if $version eq 'undef' |
|
273
|
0 |
0 |
unless defined $dist_file |
|
276
|
0 |
0 |
unless (defined $package and length $package) |
|
284
|
0 |
0 |
unless (file_name_is_absolute($full_path)) |
|
291
|
0 |
0 |
if ($self->get_config->organize_dists) { } |
|
|
0 |
0 |
elsif ($self->get_config->relative_paths_in_report) { } |
|
326
|
0 |
0 |
unless defined $full_path and -e $full_path |
|
338
|
0 |
0 |
if ($self->skip_package($package)) |
|
344
|
0 |
0 |
if $package and $version and $path |
|
355
|
0 |
0 |
unless defined $$s[1] |
|
|
0 |
0 |
unless $$a[0] cmp $$b[0] |
|
367
|
0 |
0 |
unless eval {
do {
$package_details->add_entry('package name', $package, 'version', $version, 'path', $path)
}
} |
|
425
|
0 |
0 |
unless opendir my $dh, $report_dir |
|
469
|
0 |
0 |
unless $self->get_config->exists('extra_reports_dir') |
|
472
|
0 |
0 |
unless defined $dir |
|
476
|
0 |
0 |
unless -d $dir |
|
517
|
0 |
4 |
unless -d $index_dir |
|
523
|
0 |
4 |
if (-e catfile($index_dir, '.svn')) |
|
536
|
1 |
3 |
unless ($count > 0) |
|
561
|
0 |
3 |
if -d $dpan_authors_id |
|
566
|
3 |
0 |
unless ($self->get_config->i_ignore_errors_at_my_peril) |
|
570
|
1 |
2 |
unless my $result = eval {
do {
$package_details->check_file($temp_file, $dpan_dir)
}
} |
|
573
|
1 |
2 |
if (defined $at) |
|
580
|
1 |
0 |
if (defined $error) |
|
582
|
1 |
0 |
unless $MyCPAN::App::DPAN::Reporter::Minimal::collator_logger->is_debug |
|
583
|
1 |
0 |
if defined $error |
|
592
|
1 |
1 |
unless (rename($temp_file, $packages_file)) |
|
618
|
1 |
0 |
if (not ref $at) { } |
|
|
0 |
0 |
elsif (exists $$at{'missing_in_file'}) { } |
|
|
0 |
0 |
elsif (exists $$at{'missing_in_repo'}) { } |
|
626
|
0 |
0 |
if ($self->get_config->ignore_missing_dists) { } |
|
638
|
0 |
0 |
if ($self->get_config->ignore_extra_dists) { } |
|
733
|
0 |
0 |
if (-e $module_list_file) |
|
783
|
0 |
0 |
if ($self->get_config->use_real_whois) |
|
788
|
0 |
0 |
if ($result == 2) { } |
|
800
|
0 |
0 |
unless ($success) |
|
828
|
0 |
0 |
if (defined $file) { } |
|
831
|
0 |
0 |
if (not -e $file) { } |
|
|
0 |
0 |
elsif (open my $fh, '<:utf8', $file) { } |
|
890
|
0 |
0 |
unless ('IO::Uncompress::Gunzip'->new($file)) |
|
898
|
0 |
0 |
unless my $z = 'IO::Compress::Gzip'->new($file) |
|
946
|
0 |
0 |
unless (open my $whois_fh, '+<:utf8', $file) |
|
998
|
0 |
0 |
if $@ |
|
1001
|
0 |
0 |
if ($rc == 1) { } |
|
|
0 |
0 |
elsif ($rc == 2) { } |