blib/lib/Text/Markdown/PerlExtensions.pm | |||
---|---|---|---|
Criterion | Covered | Total | % |
branch | 11 | 16 | 68.7 |
line | true | false | branch |
---|---|---|---|
24 | 16 | 32 | unless (ref $self) |
25 | 16 | 0 | if ($self ne 'Text::Markdown::PerlExtensions') { } |
52 | 2 | 6 | if (@_ == 2) { } |
6 | 0 | elsif (@_ == 3) { } | |
57 | 0 | 6 | unless exists $self->{'handlers'} |
76 | 0 | 20 | unless defined $self |
87 | 36 | 68 | if ($text =~ m[\A(.*?)($regexp)(<[^/].*)\z]ms) |
92 | 36 | 0 | if (defined $extracted) |