| line |
true |
false |
branch |
|
31
|
0 |
0 |
if /$re/u |
|
36
|
0 |
0 |
-f 'dynamic-prereqs.yml' ? : |
|
46
|
0 |
0 |
unless -e $destination |
|
47
|
0 |
0 |
if defined $_ |
|
48
|
0 |
0 |
if -M $destination > -M $source |
|
61
|
0 |
0 |
unless -f $filename |
|
77
|
0 |
0 |
if (defined $mergefile and -r $mergefile) |
|
85
|
0 |
0 |
if defined $extra->{'name'} |
|
91
|
0 |
0 |
if ($mergedata->{'license'} and @{$mergedata->{'license'};} == 1) |
|
94
|
0 |
0 |
$mergedata->{'meta-spec'} && $mergedata->{'meta-spec'}{'version'} ? : |
|
96
|
0 |
0 |
if @guess > 1 |
|
97
|
0 |
0 |
if (@guess) |
|
105
|
0 |
0 |
unless defined(my $license_pod = $data->pod($license_section)) |
|
110
|
0 |
0 |
unless @guess |
|
111
|
0 |
0 |
if @guess != 1 |
|
123
|
0 |
0 |
unless open my $changes, "<:raw", "Changes" |
|
132
|
0 |
0 |
unless $self->get_changes |
|
135
|
0 |
0 |
if $meta_version eq "0.000" |
|
137
|
0 |
0 |
if $self->{'meta'}->abstract eq "INSERT YOUR ABSTRACT HERE" |
|
139
|
0 |
0 |
if ($opts{'tag'}) |
|
143
|
0 |
0 |
if $git->status->is_dirty |
|
144
|
0 |
0 |
if eval {
do {
$git->rev_parse({"quiet", 1, "verify", 1}, "v$meta_version")
}
} |
|
149
|
0 |
0 |
if $detected_version != $meta_version |
|
168
|
0 |
0 |
if -f $_ and /\.pm$/u |
|
|
0 |
0 |
if -d "lib" |
|
169
|
0 |
0 |
if -f $_ |
|
|
0 |
0 |
if -d "script" |
|
170
|
0 |
0 |
if -f $_ and /\.(t|pm)$/u |
|
|
0 |
0 |
if -d "t" |
|
180
|
0 |
0 |
if (-d 'planner') { } |
|
181
|
0 |
0 |
if -f $_ and /\.pl$/u |
|
205
|
0 |
0 |
if (-f "prereqs.json") |
|
208
|
0 |
0 |
if (-f "prereqs.yml") |
|
211
|
0 |
0 |
if (-f "cpanfile") |
|
215
|
0 |
0 |
if ($opts{'scan'}) |
|
219
|
0 |
0 |
if (@prereqs == 1) { } |
|
|
0 |
0 |
elsif (@prereqs == 0) { } |
|
240
|
0 |
0 |
unless my $data = "Module::Metadata"->new_from_file($filename, "collect_pod", 1, "decode_pod", 1) |
|
242
|
0 |
0 |
unless my(@authors) = map({s/E<([^>]+)>/e2char($1);/egu;
/ \A \s* (.+?) \s* \z /ux;} grep({/\S/u;} split(/\n/u, ($pod_data->pod("AUTHOR") // $pod_data->pod("AUTHORS")) // "", 0))) |
|
247
|
0 |
0 |
-d 'planner' ? : |
|
248
|
0 |
0 |
$load_meta ? : |
|
249
|
0 |
0 |
unless my($abstract) = ($pod_data->pod("NAME") // "") =~ / \A \s+ \S+ \s? - \s? (.+?) \s* \z /ux |
|
254
|
0 |
0 |
if ($mode eq 'MBT') { } |
|
270
|
0 |
0 |
$opts{'trial'} // $version =~ /_/u ? : |
|
281
|
0 |
0 |
if (-e "dynamic-prereqs.yml") |
|
284
|
0 |
0 |
unless ref $expression->{'condition'} |
|
285
|
0 |
0 |
unless (ref $expression->{'prereqs'}) |
|
293
|
0 |
0 |
if (%{$mergedata;}) |
|
297
|
0 |
0 |
if ($metahash->{'x_dynamic_prereqs'}) |
|
299
|
0 |
0 |
if $mode eq "MBT" |
|
313
|
0 |
0 |
if $seen{$module}++ |
|
320
|
0 |
0 |
unless $metahash->{'no_index'} |
|
325
|
0 |
0 |
if (not $opts{'regenerate'}{'MANIFEST'} and -r 'MANIFEST') { } |
|
339
|
0 |
0 |
if ($mode eq 'MBT') { } |
|
354
|
0 |
0 |
if ($opts{'regenerate'}{'Changes'}) |
|
375
|
0 |
0 |
if ($opts{'add_repository'}) |
|
379
|
0 |
0 |
if ($origin =~ m[https://github.com/([\w.-]+)/([\w.-]+).git]u) { } |
|
|
0 |
0 |
elsif ($origin =~ m[git\@github.com:([\w.-]+)/([\w.-]+).git]u) { } |
|
|
0 |
0 |
elsif ($origin =~ m[^https?://]u) { } |
|
399
|
0 |
0 |
if ($opts{'add_bugtracker'}) |
|
403
|
0 |
0 |
if ($origin =~ m[https://github.com/([\w.-]+)/([\w.-]+).git]u) { } |
|
|
0 |
0 |
elsif ($origin =~ m[git\@github.com:([\w.-]+)/([\w.-]+).git]u) { } |
|
422
|
0 |
0 |
unless -d dirname($target) |
|
423
|
0 |
0 |
if ($files->{$filename}) { } |
|
450
|
0 |
0 |
unless exists $self->{'files'}{$filename} |
|
452
|
0 |
0 |
$raw ? : |
|
462
|
0 |
0 |
if ($opts{'build'}) { } |
|
463
|
0 |
0 |
if system $App::ModuleBuildTiny::Dist::Config{'perlpath'}, "Build.PL" |
|
464
|
0 |
0 |
if system $App::ModuleBuildTiny::Dist::Config{'perlpath'}, "Build" |
|
469
|
0 |
0 |
if $opts{'verbose'} |
|
475
|
0 |
0 |
if $opts{'verbose'} |
|
495
|
0 |
0 |
$trial ? : |