| blib/lib/Perl/Critic/Policy/logicLAB/RequirePackageNamePattern.pm | |||
|---|---|---|---|
| Criterion | Covered | Total | % |
| branch | 15 | 22 | 68.1 |
| line | true | false | branch |
|---|---|---|---|
| 20 | 0 | 13 | if ($self->{'exempt_programs'} and $document->is_program) |
| 38 | 1 | 12 | unless ($self->{'_names'}) |
| 44 | 12 | 0 | if ($children[0]->content eq 'package') { } |
| 49 | 0 | 12 | if ($self->{'debug'}) |
| 62 | 0 | 14 | if ($self->{'debug'}) |
| 66 | 6 | 8 | unless ($package =~ /$regex/sx) |
| 67 | 1 | 5 | if ($no_of_patterns > 1) { } |
| 70 | 0 | 1 | if ($no_of_patterns == $no_of_violations) |
| 106 | 0 | 13 | if ($self->{'debug'}) |
| 111 | 12 | 1 | if ($names) |
| 126 | 0 | 12 | if ($self->{'debug'}) |