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