| blib/lib/Perl/Critic/Policy/Subroutines/ProhibitCallsToUndeclaredSubs.pm | |||
|---|---|---|---|
| Criterion | Covered | Total | % |
| branch | 11 | 12 | 91.6 |
| line | true | false | branch |
|---|---|---|---|
| 40 | 5 | 23 | if (defined $args{'exempt_subs'}) |
| 56 | 10 | 0 | if ($full_name =~ /\A ( .+ ) :: ([^:]+) \z/msx) { } |
| 73 | 5 | 85 | if exists $self->{'_exempt_subs'}{$package}{$sub_name} |
| 98 | 9 | 69 | if is_qualified_name($elem) |
| 99 | 5 | 64 | if $self->_is_exempt_subroutine($elem, \@included_packages) |
| 102 | 19 | 45 | unless (exists $defined_sub_names{$name}) |