line |
true |
false |
branch |
31
|
3 |
9 |
if (-f $meta_yml and -r _) |
36
|
0 |
12 |
if (-f $meta_json and -r _) |
42
|
0 |
9 |
if (not $me->d->{'meta_yml'} and -f $mymeta_yml and -r _) |
46
|
9 |
3 |
unless ($me->d->{'meta_yml'}) |
53
|
0 |
3 |
if (($me->d->{'meta_yml_spec_version'} || '1.0') gt "1.4") |
56
|
0 |
0 |
if (not $@ and $meta_14) |
61
|
3 |
0 |
!exists $me->d->{'meta_yml'}{'dynamic_config'} || $me->d->{'meta_yml'}{'dynamic_config'} ? : |
70
|
0 |
3 |
unless my $meta = "CPAN::Meta::YAML"->read($file) |
73
|
0 |
3 |
if (@$meta > 1 or ref $meta->[0] ne ref {}) { } |
81
|
0 |
3 |
if (my $error = $@) |
85
|
3 |
0 |
if ($me->d->{'meta_yml'}) |
87
|
0 |
3 |
if $error |
90
|
0 |
3 |
if (@warnings) |
100
|
0 |
0 |
unless open my $fh, "<", $file |
104
|
0 |
0 |
if (my $error = $@) |
108
|
0 |
0 |
if ($meta) |
110
|
0 |
0 |
if $error |
114
|
0 |
0 |
if (not $me->d->{'meta_yml'}) |
123
|
0 |
7 |
unless eval "require $json_class; 1" |
131
|
0 |
3 |
if ($error = $@) { } |
|
0 |
3 |
elsif (not $spec->is_valid) { } |
152
|
12 |
0 |
!$d->{'error'}{'meta_yml_is_parsable'} ? : |
165
|
12 |
0 |
!$d->{'error'}{'meta_json_is_parsable'} ? : |
179
|
0 |
12 |
unless $d->{'meta_yml'} |
180
|
0 |
12 |
if $d->{'meta_yml'}{'provides'} |
185
|
0 |
0 |
unless $d->{'meta_yml'} |
195
|
0 |
12 |
if $d->{'error'}{'meta_yml_conforms_to_known_spec'} |
200
|
0 |
0 |
unless $d->{'meta_yml'} |
201
|
0 |
0 |
unless $d->{'meta_yml_is_parsable'} |
211
|
0 |
12 |
if $d->{'error'}{'meta_json_is_parsable'} |
212
|
0 |
12 |
if $d->{'error'}{'meta_json_conforms_to_known_spec'} |
217
|
0 |
0 |
unless $d->{'meta_json_is_parsable'} |
229
|
0 |
12 |
unless $yaml |
230
|
0 |
12 |
ref $yaml->{'requires'} eq ref {} && $yaml->{'requires'}{'perl'} ? : |
235
|
0 |
0 |
unless $yaml |
236
|
0 |
0 |
unless ref $yaml->{'requires'} eq ref {} |
237
|
0 |
0 |
unless $yaml->{'requires'}{'perl'} |
248
|
0 |
12 |
unless $yaml |
249
|
0 |
12 |
ref $yaml->{'resources'} eq ref {} && $yaml->{'resources'}{'repository'} ? : |
254
|
0 |
0 |
unless $yaml |
255
|
0 |
0 |
unless ref $yaml->{'resources'} eq ref {} |
256
|
0 |
0 |
unless $yaml->{'resources'}{'repository'} |