| blib/lib/Perl/Critic/Policy/Documentation/ProhibitLinkToSelf.pm | |||
|---|---|---|---|
| Criterion | Covered | Total | % | 
| branch | 16 | 20 | 80.0 | 
| line | true | false | branch | 
|---|---|---|---|
| 75 | 7 | 1 | if ($command eq 'head1') | 
| 82 | 8 | 0 | unless ($command_non_text{$command}) | 
| 99 | 0 | 11 | unless ($self->{'in_begin'} eq '' or $self->{'in_begin'} =~ /^:/) | 
| 105 | 10 | 1 | if ($self->{'in_name'}) | 
| 106 | 6 | 4 | if ($str =~ /^\s*([[:word:]:]+)\s*-/) | 
| 125 | 0 | 7 | if ($cmd eq 'X') { } | 
| 6 | 1 | elsif ($cmd eq 'L') { } | |
| 136 | 6 | 0 | if (defined $name and $self->{'own_package_names'}{$name}) | 
| 143 | 1 | 5 | $self->{'in_see_also'} ? : | 
| 148 | 1 | 5 | defined $display ? : |