| line |
true |
false |
branch |
|
22
|
0 |
0 |
if $self->config('build_test_options') |
|
26
|
0 |
0 |
if -e 'cpanfile' |
|
38
|
0 |
0 |
$file =~ /\.pm$/u ? : |
|
|
0 |
1 |
if $file |
|
47
|
0 |
0 |
if -e 'Makefile' |
|
49
|
0 |
0 |
if $all |
|
53
|
0 |
0 |
unless -e $file |
|
54
|
0 |
0 |
unless unlink $file |
|
55
|
0 |
0 |
unless $self->SILENT |
|
70
|
0 |
0 |
unless ($dist_file) |
|
75
|
0 |
0 |
unless ($self->config('next_version')) |
|
79
|
0 |
0 |
unless /^$VERSION_RE\s*/u |
|
87
|
0 |
0 |
if -e 'README.md' |
|
98
|
0 |
0 |
if (my $file = $_[0]) |
|
99
|
0 |
0 |
$file =~ /^.?lib/u ? : |
|
101
|
0 |
0 |
unless (-e $file) |
|
104
|
0 |
0 |
unless chdir $work_dir |
|
106
|
0 |
0 |
unless open my $MAINMODULE, '>>', $self->config('main_module_path') |
|
115
|
0 |
0 |
if $changelog eq 'Changes' |
|
119
|
0 |
0 |
if @_ |
|
126
|
0 |
0 |
unless (eval 'require Devel::Cover; 1') |
|
142
|
0 |
0 |
if -e 'cpanfile' |
|
143
|
0 |
0 |
if $self->config('changelog_filename') eq 'Changes' |
|
150
|
0 |
1 |
unless (grep {-w $_;} 'CHANGELOG.md', 'Changes')[0] |
|
155
|
0 |
0 |
if $ENV{'GIT_SHIP_CONTRIBUTORS'} |
|
161
|
0 |
0 |
if ($line =~ /$CONTRIB_START_RE/u) |
|
165
|
0 |
0 |
if $line =~ /$CONTRIB_END_RE/u |
|
166
|
0 |
0 |
unless $contrib_block |
|
168
|
0 |
0 |
if ($line =~ /$CONTRIB_NAME_EMAIL_RE/u) { } |
|
|
0 |
0 |
elsif ($line =~ /$CONTRIB_NAME_RE/u) { } |
|
185
|
0 |
3 |
if $ENV{'GIT_SHIP_MAIN_MODULE_PATH'} |
|
192
|
0 |
9 |
unless opendir my $DH, $path |
|
197
|
0 |
9 |
unless lc $_ eq lc $p |
|
199
|
3 |
6 |
unless -d $path |
|
210
|
3 |
0 |
if $name[0] eq 'lib' |
|
223
|
1 |
6 |
if @message and /^$VERSION_RE\s+/u |
|
224
|
3 |
3 |
if @message |
|
225
|
1 |
5 |
if /^$VERSION_RE\s+/u |
|
228
|
0 |
1 |
unless @message |
|
270
|
0 |
0 |
unless (-r $file) |
|
284
|
0 |
0 |
unless -e 'Makefile.PL' |
|
285
|
0 |
0 |
unless -e 'Makefile' |
|
311
|
0 |
0 |
if (-e 'README.md') { } |
|
|
0 |
0 |
elsif (my(@alternative) = path()->list->grep(sub {
/^README/iu;
}
)->each) { } |
|
313
|
0 |
0 |
path('README.md')->slurp =~ /$re/u ? : |
|
319
|
0 |
0 |
if ($skip) |
|
320
|
0 |
0 |
unless $self->SILENT |
|
324
|
0 |
0 |
unless open my $README, '>:encoding(UTF-8)', 'README.md' |
|
328
|
0 |
0 |
unless $self->SILENT |
|
350
|
0 |
0 |
if s/^$VERSION_RE\x20*(?:Not Released)?\x20*([\r\n]+)/{
&$release_line($1) . $2;
} ;/eu |
|
355
|
0 |
0 |
unless $self->SILENT |
|
356
|
0 |
0 |
unless $self->config('next_version') |
|
362
|
0 |
0 |
unless (eval 'require CPAN::Changes; 1') |
|
363
|
0 |
0 |
unless $self->SILENT |
|
372
|
0 |
0 |
unless $self->SILENT |
|
377
|
0 |
0 |
unless my $version = $self->config('next_version') |
|
384
|
0 |
0 |
if /^=head1 VERSION/u .. $r{'pod'} && /^=(cut|head1)/u || eof |
|
389
|
0 |
0 |
unless $r{'var'} |