line |
true |
false |
branch |
31
|
3 |
8 |
if (-f $meta_yml and -r _) |
36
|
0 |
11 |
if (-f $meta_json and -r _) |
42
|
0 |
8 |
if (not $me->d->{'meta_yml'} and -f $mymeta_yml and -r _) |
46
|
8 |
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 |
113
|
0 |
0 |
if (not $me->d->{'meta_yml'}) |
122
|
0 |
7 |
unless eval "require $json_class; 1" |
130
|
0 |
3 |
if ($error = $@) { } |
|
0 |
3 |
elsif (not $spec->is_valid) { } |
151
|
11 |
0 |
!$d->{'error'}{'meta_yml_is_parsable'} ? : |
164
|
11 |
0 |
!$d->{'error'}{'meta_json_is_parsable'} ? : |
178
|
0 |
11 |
unless $d->{'meta_yml'} |
179
|
0 |
11 |
if $d->{'meta_yml'}{'provides'} |
184
|
0 |
0 |
unless $d->{'meta_yml'} |
194
|
0 |
11 |
if $d->{'error'}{'meta_yml_conforms_to_known_spec'} |
199
|
0 |
0 |
unless $d->{'meta_yml'} |
200
|
0 |
0 |
unless $d->{'meta_yml_is_parsable'} |
210
|
0 |
11 |
if $d->{'error'}{'meta_json_is_parsable'} |
211
|
0 |
11 |
if $d->{'error'}{'meta_json_conforms_to_known_spec'} |
216
|
0 |
0 |
unless $d->{'meta_json_is_parsable'} |
228
|
0 |
11 |
unless $yaml |
229
|
0 |
11 |
ref $yaml->{'requires'} eq ref {} && $yaml->{'requires'}{'perl'} ? : |
234
|
0 |
0 |
unless $yaml |
235
|
0 |
0 |
unless ref $yaml->{'requires'} eq ref {} |
236
|
0 |
0 |
unless $yaml->{'requires'}{'perl'} |
247
|
0 |
11 |
unless $yaml |
248
|
0 |
11 |
ref $yaml->{'resources'} eq ref {} && $yaml->{'resources'}{'repository'} ? : |
253
|
0 |
0 |
unless $yaml |
254
|
0 |
0 |
unless ref $yaml->{'resources'} eq ref {} |
255
|
0 |
0 |
unless $yaml->{'resources'}{'repository'} |