blib/lib/Lingua/EN/Titlecase/HTML.pm | |||
---|---|---|---|
Criterion | Covered | Total | % |
branch | 13 | 14 | 92.8 |
line | true | false | branch |
---|---|---|---|
9 | 272 | 8 | if $$self{'_lexer'} |
15 | 14 | 354 | unless ($$self{'_raw_html'}) |
20 | 176 | 192 | if (defined $$self{'__text'} and length $$self{'__text'}) { } |
178 | 14 | elsif (my $token = $$self{'_parser'}->get_token) { } | |
22 | 88 | 88 | if $$self{'__text'} =~ s/\A($wordish)// |
23 | 88 | 0 | if $$self{'__text'} =~ s/\A(.)//s |
27 | 90 | 88 | unless $$token[0] eq 'T' |