blib/lib/Locale/CA.pm | |||
---|---|---|---|
Criterion | Covered | Total | % |
branch | 14 | 20 | 70.0 |
line | true | false | branch |
---|---|---|---|
46 | 1 | 7 | unless (defined $class) |
56 | 1 | 7 | if (ref $_[0] eq 'HASH') { } |
6 | 1 | elsif (scalar(@_) % 2 == 0) { } | |
65 | 4 | 4 | if (defined(my $lang = $params{'lang'} || _get_language())) { } |
66 | 3 | 1 | if ($lang eq 'fr' or $lang eq 'en') { } |
91 | 0 | 5 | if (my $language = $ENV{'LANGUAGE'}) |
93 | 0 | 0 | if ($l eq "en" or $l eq "fr") |
100 | 14 | 1 | unless defined $val |
103 | 1 | 0 | if ($val eq "en" or $val eq "fr") |
107 | 0 | 0 | if (defined $ENV{'LANG'} and $ENV{'LANG'} =~ /^C\./ || $ENV{'LANG'} eq 'C') |