line |
true |
false |
branch |
35
|
3 |
0 |
if (eval q[use Unicode::Normalize 'normalize'; 1]) { } |
67
|
16 |
1 |
if ($lang eq 'en') { } |
|
1 |
0 |
elsif ($lang eq 'fr') { } |
75
|
0 |
17 |
$self->{'ordinal_func'} ? : |
80
|
3 |
14 |
$without_conjunctions ? : |
|
0 |
17 |
$lang eq 'en' && $conjunctions_word ne 'and' && ($lang eq 'fr' && $conjunctions_word ne 'et') ? : |
96
|
1 |
0 |
$lang eq 'fr' ? : |
|
16 |
1 |
$lang eq 'en' ? : |
106
|
3 |
14 |
$without_conjunctions && defined $conjunctions_word ? : |
115
|
13 |
4 |
unless (defined $initial_string) |
116
|
8 |
5 |
unless ($letter) |
120
|
0 |
13 |
unless (defined($initial_string = $default_initial_string{$lang})) |
133
|
4 |
13 |
unless (defined $letter) |
134
|
4 |
0 |
if (defined $initial_string) { } |
141
|
1 |
16 |
unless (length $letter) |
163
|
1 |
18 |
if ($str eq 'premier') |
172
|
472 |
204 |
if (my $n = shift @$ret) |