| blib/lib/Perl/Critic/Policy/Documentation/RequireLinkedURLs.pm | |||
|---|---|---|---|
| Criterion | Covered | Total | % |
| branch | 11 | 12 | 91.6 |
| line | true | false | branch |
|---|---|---|---|
| 48 | 4 | 35 | if (not $got_perl or $want_perl > $got_perl) |
| 77 | 6 | 58 | unless ($self->{'in_begin'} eq '' or $self->{'in_begin'} =~ /^:/) |
| 87 | 65 | 12 | if (not ref $obj) { } |
| 93 | 6 | 24 | if _is_bogus_part($part) |
| 105 | 3 | 9 | if ($cmd eq 'L') { } |
| 113 | 9 | 0 | if (my $subtree = $obj->parse_tree) |