| blib/lib/Perl/Critic/Policy/Subroutines/ProhibitExportingUndeclaredSubs.pm | |||
|---|---|---|---|
| Criterion | Covered | Total | % |
| branch | 3 | 6 | 50.0 |
| line | true | false | branch |
|---|---|---|---|
| 41 | 0 | 6 | unless (eval { do { @exported_sub_names = find_exported_subroutine_names($doc); 1 } }) |
| 43 | 0 | 0 | if ($Perl::Critic::Policy::Subroutines::ProhibitExportingUndeclaredSubs::EVAL_ERROR =~ /Found \s multiple/msx) |
| 59 | 5 | 8 | unless (exists $declared_sub_names{$sub_name}) |