blib/lib/Perl/Critic/Policy/Modules/ProhibitEvilModules.pm | |||
---|---|---|---|
Criterion | Covered | Total | % |
condition | 12 | 16 | 75.0 |
line | l | !l | condition |
---|---|---|---|
205 | 5 | 5 | $self->{'_evil_modules_regexes'} ||= [] |
213 | 294 | 100 | $self->{'_evil_modules'} ||= {} |
line | l | !l&&r | !l&&!r | condition |
---|---|---|---|---|
105 | 11 | 94 | 0 | $config_string // $parameter->get_default_string |
190 | 392 | 0 | 13 | $arguments{'description'} || $Perl::Critic::Policy::Modules::ProhibitEvilModules::EMPTY |
229 | 81 | 0 | 4 | exists $self->{'_evil_modules'} || exists $self->{'_evil_modules_regexes'} |
258 | 12 | 14 | 0 | $description ||= qq[Prohibited module "$module" used] |