| line |
true |
false |
branch |
|
24
|
0 |
0 |
if (my $ver = &prompt("Next Release?", scalar $self->default_new_version($project))) |
|
26
|
0 |
0 |
unless (version::is_lax($ver)) |
|
31
|
0 |
0 |
unless (check_version_compatibility($curr_ver, $ver)) |
|
37
|
0 |
0 |
unless (&prompt($msg) =~ /y/i) |
|
44
|
0 |
0 |
if ($opts->{'dry_run'}) |
|
47
|
0 |
0 |
unless ($opts->{'dry_run'}) |
|
53
|
0 |
0 |
if (exists_tag($project->format_tag($newver))) |
|
64
|
0 |
0 |
if $file =~ /\.t$/ |
|
65
|
0 |
0 |
if $file =~ m[\Ashare/] |
|
67
|
0 |
0 |
if $file eq "Makefile.PL" or $file eq "Build.PL" |
|
69
|
0 |
0 |
unless $project->no_index->{'directory'} |
|
|
0 |
0 |
if grep {$file =~ m[^$_/];} @{[] unless $project->no_index->{'directory'};} |
|
70
|
0 |
0 |
unless $project->no_index->{'file'} |
|
|
0 |
0 |
if grep {$file eq $_;} @{[] unless $project->no_index->{'file'};} |
|
79
|
0 |
0 |
unless @_ == 2 |
|
82
|
0 |
0 |
if (not exists_tag($project->format_tag($curver))) { } |
|
102
|
3 |
4 |
/^(?:0|[1-9][0-9]*)(?:\.[0-9]+){2}(?:_[0-9]+)?$/ ? : |
|
|
5 |
7 |
/^v(?:0|[1-9][0-9]*)(?:\.[0-9]+){1,2}(?:_[0-9]+)?$/ ? : |
|
|
3 |
12 |
/^(?:0|[1-9][0-9]*)\.[0-9]+(?:_[0-9]+)?$/ ? : |