| blib/lib/Perl/Critic/Policy/Documentation/ProhibitBadAproposMarkup.pm | |||
|---|---|---|---|
| Criterion | Covered | Total | % |
| branch | 8 | 8 | 100.0 |
| line | true | false | branch |
|---|---|---|---|
| 56 | 14 | 9 | if ($command eq 'head1') |
| 57 | 11 | 3 | $text =~ /^NAME\s*$/ ? : |
| 71 | 3 | 13 | unless ($self->{'in_begin'} eq '' or $self->{'in_begin'} =~ /^:(man|MAN|roff|ROFF)$/) |
| 88 | 8 | 4 | if ($self->{'in_NAME'} and $command eq 'C') |