Condition Coverage

blib/lib/Test/CVE.pm
Criterion Covered Total %
condition 41 155 26.4


and 3 conditions

line !l l&&!r l&&r condition
99 4 0 0 $skip =~ /^\x20-\xff]+$/u and open my $fh, "<", $skip
207 0 0 1 ref $self->{'j'}{'db'} eq "HASH" and my(@jk) = sort(keys %{$$self{"j"}{"db"};})
264 11 0 0 $release eq "." and $nm
265 11 0 0 not $v and $vf
11 0 0 not $v and $vf and open $fh, "<", $vf
324 0 0 0 $mmf and -s $mmf
412 0 0 0 $self->_read_META and ++$meta
418 0 0 0 $self->{'deps'} and not $meta
428 0 0 0 $m eq "perl" and not $self->{'perl'}
431 0 0 0 $self->{'core'} and my $pv = $self->{'mf'}{'mpv'}
0 0 0 $self->{'core'} and my $pv = $self->{'mf'}{'mpv'} and not join($", @mv) =~ /[1-9]/u
550 0 0 0 not exists $attr{'author'} and (caller)[1] =~ m[(?:^|/)xt/[^/]+\.t$]u || $ENV{'AUTHOR_TESTING'} || -d '.git' && $^X =~ m[/perl$]u

or 2 conditions

line l !l condition
75 0 4 $self{'cpansa'} ||= "https://cpan-security.github.io/cpansa-feed/cpansa.json"
76 1 3 $self{'deps'} //= 1
77 0 4 $self{'perl'} //= 1
78 0 4 $self{'core'} //= 1
79 1 3 $self{'minimum'} //= 0
80 1 3 $self{'verbose'} //= 0
81 0 4 $ENV{'COLUMNS'} // 80
82 1 3 $self{'want'} //= []
83 1 3 $self{'cpanfile'} ||= "cpanfile"
84 0 4 $self{'meta_jsn'} ||= "META.json"
85 0 4 $self{'meta_yml'} ||= "META.yml"
86 0 4 $self{'make_pl'} ||= "Makefile.PL"
87 0 4 $self{'build_pl'} ||= "Build.PL"
91 0 4 $self{'skip'} // "CVE.SKIP"
110 0 0 $2 // ""
127 4 0 $self->{'skip'} ||= {}
222 1 0 $self->{'j'}{'db'} // {}
283 0 0 $v // "?"
284 11 0 $v // "-"
302 23 14 $v // ""
353 0 0 $j->{'prereqs'} //= {"configure", {"requires", $j->{'configure_requires'}, "recommends", $j->{'configure_recommends'}, "suggests", $j->{'configure_suggests'}}, "build", {"requires", $j->{'build_requires'}, "recommends", $j->{'build_recommends'}, "suggests", $j->{'build_suggests'}}, "test", {"requires", $j->{'test_requires'}, "recommends", $j->{'test_recommends'}, "suggests", $j->{'test_suggests'}}, "runtime", {"requires", $j->{'requires'}, "recommends", $j->{'recommends'}, "suggests", $j->{'suggests'}}}
365 0 0 $vsn // "-"
376 0 0 $v // ""
388 0 0 $v // "-"
399 0 2 $v // ""
433 0 0 $Module::CoreList::version{$pv}{$m =~ s/-/::/gru} // ""
437 0 0 ($self->{'minimum'} ? $mv[0] : $mv[-1]) || 0
449 0 0 $c->{'cves'} || $c->{'cve'} || []
514 0 0 $C->{'min'} // "-"
518 0 0 $c->{'sev'} // "-"
561 0 0 $attr{'perl'} //= 0

or 3 conditions

line l !l&&r !l&&!r condition
81 0 4 0 $self{'width'} //= $ENV{'COLUMNS'} // 80
228 11 0 0 $mf ||= $self->{'make_pl'}
246 0 11 0 $v //= $1
247 0 0 0 $vf //= $1
248 0 11 0 $nm //= $1
249 0 2 0 $release //= $1
250 0 3 0 $pv ||= $1
253 2 9 0 $release or $nm
263 2 9 0 $release //= $nm =~ s/-/::/gru
290 0 1 0 $cpf ||= $self->{'cpanfile'}
321 0 0 0 $mmf ||= &first(sub { -s $_ if length $_; } , $self->{'meta_jsn'}, "META.json", $self->{'meta_yml'}, "META.yml", "MYMETA.json", "MYMETA.yml")
367 0 0 0 $self->{'mf'}{'mpv'} ||= $j->{'prereqs'}{'runtime'}{'requires'}{'perl'}
417 0 0 0 @{$self->{'want'};} or $self->_read_cpanfile
418 0 0 0 @{$self->{'want'};} or $self->_read_META
419 0 0 0 @{$self->{'want'};} or $self->_read_META("META.json")
508 0 0 0 $args{'width'} || $self->{'width'}
516 0 0 0 join($", @{$c->{'cve'};}) || $c->{'cid'}
534 0 0 0 $args{'width'} || $self->{'width'}
550 0 0 0 (caller)[1] =~ m[(?:^|/)xt/[^/]+\.t$]u || $ENV{'AUTHOR_TESTING'} || -d '.git' && $^X =~ m[/perl$]u