| line |
true |
false |
branch |
|
57
|
0 |
0 |
if ($module_name and $perl_version) { } |
|
59
|
0 |
0 |
if ($Module::CoreList::version{$perl_version} and exists $Module::CoreList::version{$perl_version}{$module_name}) { } |
|
61
|
0 |
0 |
exists $Module::CoreList::version{$perl_version}{$module_name} ? : |
|
87
|
1 |
0 |
if ($module_name) { } |
|
|
0 |
0 |
elsif ($perl_version) { } |
|
89
|
1 |
0 |
$perl_version ? : |
|
91
|
1 |
0 |
$perl_version ? : |
|
95
|
0 |
0 |
Module::CoreList::find_version($perl_version) ? : |
|
163
|
3 |
45 |
if ($line =~ /^\s*(?:build_|configure_|)requires/i) { } |
|
|
3 |
42 |
elsif ($candidate and $line =~ /^\s*}/) { } |
|
|
18 |
43 |
elsif ($candidate and $line =~ /^\s*(['"])?([\w:]+)\1?\s*=>\s*(.+),/) { } |
|
201
|
0 |
0 |
if ($line =~ /^\s*PREREQ_PM/i) { } |
|
|
0 |
0 |
elsif ($candidate and $line =~ /^\s*}/) { } |
|
|
0 |
0 |
elsif ($candidate and $line =~ /^\s*(['"])?([\w:]+)\1?\s*=>\s*(.+),/) { } |
|
239
|
0 |
0 |
if ($module eq $$name[0]) |
|
252
|
0 |
0 |
unless (defined $module_list{$name}) |
|
265
|
0 |
0 |
if $ENV{'AUTHOR_TESTING'} |
|
305
|
8 |
6364 |
if ($module eq $$name[0]) |
|
318
|
10 |
8 |
unless (defined $module_list{$name}) |
|
333
|
1 |
0 |
if (not $file_name) { } |
|
|
0 |
0 |
elsif (not $file_name =~ /^(?:Build.PL|Makefile.PL)$/i) { } |
|
342
|
0 |
1 |
unless opendir INX, $self->dir_name |
|
346
|
0 |
1 |
if ($#file < 0) |
|
355
|
0 |
1 |
unless open INX, 'File::Spec'->catfile($self->dir_name, $file[0]) |
|
363
|
1 |
0 |
if ($file[0] eq 'Build.PL') { } |
|
372
|
0 |
1 |
if ($self->report_type =~ /^h/i) { } |