| blib/lib/Lingua/EN/TitleParse.pm | |||
|---|---|---|---|
| Criterion | Covered | Total | % |
| branch | 17 | 18 | 94.4 |
| line | true | false | branch |
|---|---|---|---|
| 13 | 1 | 3 | $params{'titles'} ? : |
| 14 | 1 | 3 | $params{'clean'} ? : |
| 34 | 0 | 16 | unless defined $name |
| 37 | 15 | 1 | ref $self ? : |
| 47 | 15 | 5 | if (exists $$titles{$possible_title}) |
| 53 | 15 | 1 | if ($normalised_title) |
| 66 | 81 | 8 | if $character =~ /^\w$/ |
| 83 | 1 | 14 | if $normalised_title and ref $self and $$self{'clean'} |
| 107 | 1 | 1 | ref $self ? : |