| blib/lib/Perl/Critic/Policy/Documentation/ProhibitParagraphEndComma.pm | |||
|---|---|---|---|
| Criterion | Covered | Total | % |
| branch | 9 | 12 | 75.0 |
| line | true | false | branch |
|---|---|---|---|
| 78 | 3 | 3 | if ($command eq 'for' or $command eq 'pod' or $command eq 'begin' and $text =~ /^\s*:/ or $command eq 'end') |
| 85 | 0 | 3 | if ($command eq 'item' and $self->{'last_command'} eq 'item') { } |
| 1 | 2 | elsif ($command eq 'over') { } | |
| 101 | 0 | 10 | unless (defined $text) |
| 116 | 0 | 19 | if ($self->{'in_begin'} and not $self->{'in_begin'} =~ /^:/) { } |
| 3 | 16 | elsif ($self->{'last_text'} =~ /(,\s*)$/s) { } |