Branch Coverage

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')