| line |
true |
false |
branch |
|
14
|
0 |
0 |
ref $_[0] ? : |
|
17
|
0 |
0 |
unless $ENV{'RELEASE_TESTING'} |
|
22
|
0 |
0 |
unless $author |
|
27
|
0 |
0 |
if $opts->{'dev'} |
|
47
|
0 |
0 |
unless ($module_maintainers) |
|
55
|
0 |
0 |
if (grep {uc $_ eq uc $author;} @$module_maintainers) { } |
|
65
|
0 |
0 |
if ($meta_authority) |
|
67
|
0 |
0 |
if ($file_authority and $file_authority ne $meta_authority) |
|
79
|
0 |
0 |
if (not $saw_errors and %new_packages and keys %new_packages < keys %$provides and keys %dist_maintainers > @authorities) |
|
87
|
0 |
0 |
if ($opts->{'strict'}) { } |
|
107
|
0 |
0 |
if ($meta and $meta->{'x_authority'}) |
|
116
|
0 |
0 |
unless -f $file and -r _ |
|
118
|
0 |
0 |
if $meta and ref $meta eq ref {} |
|
125
|
0 |
0 |
unless $file and -f $file and -r _ |
|
127
|
0 |
0 |
unless open my $fh, '<', $file |
|
130
|
0 |
0 |
if /__(DATA|END)__/ |
|
131
|
0 |
0 |
/^=cut/ ? : |
|
|
0 |
0 |
/^=(?!cut?)/ ? : |
|
132
|
0 |
0 |
if $in_pod |
|
134
|
0 |
0 |
if (/\$(?:$package::)?AUTHORITY\s*=.+?(?i:cpan):([A-Za-z0-9]+)/) |
|
142
|
0 |
0 |
if ($use_metacpan) { } |
|
144
|
0 |
0 |
if $@ |
|
150
|
0 |
0 |
$perms->{$module} ? : |
|
159
|
0 |
0 |
$mp ? : |