| line |
true |
false |
branch |
|
99
|
0 |
0 |
if ($module_name and $perl_version) { } |
|
101
|
0 |
0 |
if ($Module::CoreList::version{$perl_version} and exists $Module::CoreList::version{$perl_version}{$module_name}) { } |
|
103
|
0 |
0 |
exists $Module::CoreList::version{$perl_version}{$module_name} ? : |
|
129
|
1 |
0 |
if ($module_name) { } |
|
|
0 |
0 |
elsif ($perl_version) { } |
|
131
|
1 |
0 |
$perl_version ? : |
|
133
|
1 |
0 |
$perl_version ? : |
|
137
|
0 |
0 |
Module::CoreList::find_version($perl_version) ? : |
|
177
|
0 |
0 |
if ($line =~ /^\s*(?:build_|configure_|)requires/i) { } |
|
|
0 |
0 |
elsif ($candidate and $line =~ /^\s*}/) { } |
|
|
0 |
0 |
elsif ($candidate and $line =~ /^\s*(['"])?([\w:]+)\1?\s*=>\s*(.+),/) { } |
|
215
|
1 |
86 |
if ($line =~ /^\s*PREREQ_PM/i) { } |
|
|
1 |
85 |
elsif ($candidate and $line =~ /^\s*}/) { } |
|
|
16 |
135 |
elsif ($candidate and $line =~ /^\s*(['"])?([\w:]+)\1?\s*=>\s*(.+),/) { } |
|
253
|
0 |
0 |
if ($module eq $name->[0]) |
|
266
|
0 |
0 |
unless (defined $module_list{$name}) |
|
279
|
0 |
0 |
if $ENV{'AUTHOR_TESTING'} |
|
319
|
7 |
5657 |
if ($module eq $name->[0]) |
|
332
|
9 |
7 |
unless (defined $module_list{$name}) |
|
347
|
1 |
0 |
if (not $file_name) { } |
|
|
0 |
0 |
elsif (not $file_name =~ /^(?:Build.PL|Makefile.PL)$/i) { } |
|
356
|
0 |
1 |
unless opendir INX, $self->dir_name |
|
360
|
0 |
1 |
if ($#file < 0) |
|
369
|
0 |
1 |
unless open INX, 'File::Spec'->catfile($self->dir_name, $file[0]) |
|
377
|
0 |
1 |
if ($file[0] eq 'Build.PL') { } |
|
386
|
0 |
1 |
if ($self->report_type =~ /^h/i) { } |