Branch Coverage

blib/lib/Locale/Object/Language.pm
Criterion Covered Total %
branch 24 32 75.0


line true false branch
29 0 53 unless scalar keys %params == 1
40 0 53 unless exists $allowed_params{$parameter}
46 5 48 if ($parameter eq 'name') { }
48 0 elsif ($parameter eq 'code_alpha2' or $parameter eq 'code_alpha3') { }
63 0 53 unless $result
65 52 1 if (defined @{$result;}[0]) { }
74 14 38 if $enguage
110 0 38 unless my $code_alpha3 = $self->code_alpha3
146 9 0 if $self->{'_name'}
149 8 1 if wantarray
160 3 6 if $existing->{$code}{'_countries'}
190 38 5 if (@_)
203 38 28 if (@_)
216 38 185 if (@_)
231 0 23 unless $where->isa('Locale::Object::Country')
243 0 23 unless exists $used_langs{$selected}