line |
true |
false |
branch |
100
|
0 |
5 |
unless my $changesFile = $files->grep(sub {
$_->name eq $changelog;
}
)->head
|
178
|
0 |
0 |
if not $release_date && $self->_release_datetime or $release_date =~ /^[[:upper:]]+$/
|
210
|
5 |
10 |
if ($line =~ /^$re/)
|
211
|
0 |
5 |
unless $1 eq $version
|
217
|
5 |
10 |
if $line =~ /^\S/ and --$list_releases <= 0
|
222
|
0 |
5 |
unless length $text > 1
|
231
|
0 |
5 |
unless $release_date
|
245
|
4 |
1 |
$release_date =~ /
^ ( \d{4}-\d\d-\d\d
(?: \s \d\d:\d\d (?: :\d\d)? )?
) \b
/x ? :
|
253
|
5 |
0 |
if ($parser->success) { }
|
260
|
2 |
3 |
if ($release_datetime and $self->date_format)
|
286
|
5 |
5 |
if (not $version and $pmFile =~ m[^lib/(.+)\.pod$]) { }
|
293
|
0 |
10 |
unless $version
|
296
|
10 |
0 |
$self->report_versions ? :
|
339
|
0 |
0 |
unless defined $indent
|
347
|
0 |
0 |
unless $builder
|
351
|
0 |
0 |
$builder eq 'Build.PL' ? :
|
371
|
10 |
0 |
if defined($ver = $meta->{$key}{$module})
|
374
|
0 |
10 |
unless defined $ver
|
377
|
5 |
5 |
if ($ver) { }
|
391
|
5 |
0 |
if ($requires{'perl'})
|
397
|
5 |
0 |
if $v >= 5.006
|
400
|
0 |
5 |
unless @modules
|
446
|
0 |
0 |
if ($offset)
|