line |
true |
false |
branch |
18
|
0 |
5 |
unless ($version =~ /^\d+(\.\d+)?$/) |
25
|
0 |
5 |
unless -d $lib |
27
|
0 |
5 |
unless -d $arch |
71
|
0 |
7 |
unless $meta_file =~ s/\.pm$/.yaml/ |
74
|
7 |
0 |
if (-f $meta_file) |
75
|
0 |
7 |
unless open META, $meta_file |
80
|
7 |
0 |
if ($meta eq $old_meta) { } |
85
|
0 |
0 |
unless open META, '>', $meta_file |
96
|
7 |
0 |
unless $dirs[-1] |
98
|
5 |
2 |
scalar @dirs ? : |
99
|
5 |
2 |
$dir ? : |
104
|
0 |
13 |
unless $path |
106
|
3 |
10 |
if $base |
108
|
0 |
13 |
unless opendir DIR, $path |
111
|
26 |
10 |
if $file =~ /^\./ |
114
|
7 |
3 |
if ($file =~ /^\w+\.pm$/) { } |
|
3 |
0 |
elsif (-d $dir_path) { } |
127
|
5 |
0 |
if -d 'blib' and -d $lib || -d $arch |
128
|
0 |
0 |
if (-f 'Build.PL') { } |
|
0 |
0 |
elsif (-f 'Makefile.PL') { } |
159
|
3 |
2 |
if (-f 'META.yml') { } |
160
|
0 |
3 |
unless open META, 'META.yml' |
165
|
3 |
0 |
if ($meta =~ /^name\s*:\s+(\S+)$/m) |
168
|
3 |
0 |
if ($meta =~ /^version\s*:\s+(\S+)$/m) |
173
|
2 |
0 |
if (-f 'Makefile') |
174
|
0 |
2 |
unless open MAKEFILE, 'Makefile' |
179
|
2 |
0 |
if ($makefile =~ /^DISTNAME\s*=\s*(\S+)$/m) |
182
|
2 |
0 |
if ($makefile =~ /^VERSION\s*=\s*(\S+)$/m) |
187
|
0 |
5 |
unless length $dist_ver |