lib/Perl/PrereqScanner/NotQuiteLite/App.pm | |||
---|---|---|---|
Criterion | Covered | Total | % |
condition | 38 | 80 | 47.5 |
line | !l | l&&!r | l&&r | condition |
---|---|---|---|---|
41 | 30 | 0 | 12 | $opts{'features'} and ref $opts{'features'} ne "HASH" |
63 | 40 | 0 | 2 | $opts{'ignore'} and ref $opts{'ignore'} eq "ARRAY" |
73 | 41 | 0 | 1 | $opts{'private'} and ref $opts{'private'} eq "ARRAY" |
82 | 40 | 0 | 2 | $opts{'optional'} and ref $opts{'optional'} eq "ARRAY" |
120 | 42 | 0 | 0 | $self->{'blib'} and -d "File::Spec"->catdir($self->{'base_dir'}, "blib") |
265 | 145 | 8 | 3 | $private_re and $module =~ /$private_re/ |
299 | 7 | 0 | 20 | Module::CoreList::is_core($module, undef, $perl_version) and not Module::CoreList::deprecated_in($module, undef, $perl_version) |
447 | 0 | 0 | 0 | $self->{'develop'} and $relpath =~ /^(?:author)\b/ |
461 | 65 | 3 | 3 | $self->{'optional_re'} && $file =~ /\b$self->{'optional_re'}\b/ |
line | l | !l | condition |
---|---|---|---|
200 | 0 | 0 | $hash->{$module} || 0 |
279 | 1 | 5 | $self->{'perl_version'} || $self->_find_used_perl_version || '5.008001' |
281 | 0 | 1 | $2 || 0 |
421 | 0 | 0 | $depth || 0 |
line | l | !l&&r | !l&&!r | condition |
---|---|---|---|---|
37 | 42 | 0 | 0 | $opts{'base_dir'} ||= "File::Spec"->curdir |
70 | 0 | 2 | 0 | $opts{'ignore_re'} ||= $re->_regexp |
79 | 0 | 1 | 0 | $opts{'private_re'} ||= $re->_regexp |
89 | 0 | 2 | 0 | $opts{'optional_re'} ||= $re->_regexp |
103 | 0 | 2 | 0 | $opts{'libs'} ||= delete $opts{'scan_also'} |
162 | 0 | 15 | 27 | $self->{'print'} or $self->{'cpanfile'} |
209 | 0 | 54 | 0 | $prereqs ||= $self->{'prereqs'} |
265 | 5 | 3 | 153 | $self->{'possible_modules'}{$module} or $private_re and $module =~ /$private_re/ |
334 | 3 | 0 | 0 | $self->{'recommends'} or $self->{'suggests'} |
344 | 2 | 0 | 0 | $self->{'recommends'} or $self->{'suggests'} |
367 | 0 | 0 | 0 | $self->{'uri_cache'}{$module} ||= $self->__get_uri($module) |
447 | 42 | 0 | 0 | $relpath =~ /\.(?:pl|PL|pm|cgi|psgi|t)$/ or dirname($relpath) =~ /\b(?:bin|scripts?)$/ |
42 | 0 | 0 | $relpath =~ /\.(?:pl|PL|pm|cgi|psgi|t)$/ or dirname($relpath) =~ /\b(?:bin|scripts?)$/ or $self->{'develop'} and $relpath =~ /^(?:author)\b/ | |
479 | 1 | 11 | 0 | $feature->{'prereqs'} ||= "CPAN::Meta::Prereqs"->new |
519 | 64 | 0 | 0 | $self->{'suggests'} or $self->{'recommends'} |