Branch Coverage

lib/Text/PO/Gettext.pm
Criterion Covered Total %
branch 79 146 54.1


line true false branch
116 0 2 unless $self->SUPER::init(@_)
117 0 2 unless (defined $self->{'path'} and length $self->{'path'})
121 0 2 unless $self->textdomain($self->{'domain'})
130 0 0 unless defined $locale and length $locale
131 0 0 unless defined $key and length $key
133 0 0 unless ($self->isSupportedLanguage($locale))
157 8 6 if ref $_[-1] eq "HASH"
161 10 4 unless (defined $count and $count =~ /^\d+$/)
165 7 7 unless (exists $opts->{'locale'} and length $opts->{'locale'})
171 0 14 unless (exists $$hash{$opts->{'locale'}})
173 0 0 if $self->_is_warnings_enabled("Text::PO")
178 14 0 if ($dict) { }
180 0 14 if ($plural->length == 0)
184 4 10 if (ref $dict->{'msgstr'} eq "ARRAY")
186 4 0 if ($self->_is_number($count) and int $plural->[0] > 0) { }
194 0 4 if ($@) { }
196 0 0 if $self->_is_warnings_enabled("Text::PO")
208 4 0 ref $dict->{'msgstr'}[$index] eq 'ARRAY' ? :
209 4 0 if length "$locale_str"
216 0 0 if $self->_is_warnings_enabled("Text::PO")
224 2 38 if (@_)
227 0 2 if (not $v) { }
0 2 elsif (not $v =~ /^$Text::PO::Gettext::DOMAIN_RE$/) { }
238 0 2 unless $caller eq "Module::Generic::init"
248 0 2 if (not defined $lang) { }
0 2 elsif (not length $lang) { }
0 2 elsif (not $lang =~ /^$Text::PO::Gettext::LOCALE_RE$/) { }
289 1 1 if ($opts->{'monday_first'})
303 1 1 if ($opts->{'monday_first'})
320 0 38 unless (exists $$hash{$opts->{'domain'}})
325 18 20 if (exists $opts->{'locale'} and defined $opts->{'locale'})
329 0 18 if (length $opts->{'locale'} == 0)
344 0 2 unless ($lang =~ /^$Text::PO::Gettext::LOCALE_RE$/)
350 1 1 unless ($self->isSupportedLanguage($lang))
355 0 1 unless (exists $hash->{$lang})
369 1 0 if (scalar @$res > 0) { }
384 1 0 if (scalar @$res > 0) { }
454 0 2 unless defined $key and length $key
462 0 1 if ref $_[-1] eq "HASH"
486 0 3 unless exists $l10n->{$dom}
488 2 1 if (exists $dict->{$lang}) { }
509 2 39 if (@_)
512 0 2 if (not defined $v && length $v) { }
2 0 elsif ($v =~ /^$Text::PO::Gettext::LOCALE_RE$/) { }
523 0 2 if defined $enc
529 0 2 unless $self->{'domain'}
534 0 2 unless $caller eq "Module::Generic::init"
544 31 0 if ($loc =~ /^$Text::PO::Gettext::LOCALE_RE$/)
548 3 28 if defined $enc
558 10 0 if ($loc =~ /^$Text::PO::Gettext::LOCALE_RE$/)
562 3 7 if defined $enc
579 0 15 if (@_) { }
585 1 14 unless (scalar @{$self->{'plural'};})
612 2 0 $self->category ? :
613 2 0 $self->category ? :
614 2 0 $self->category ? :
618 2 0 if ($self->use_json and $path_json->exists) { }
0 0 elsif ($path_po->exists) { }
0 0 elsif ($path_mo->exists) { }
623 0 2 unless $po->parse2object($file)
631 0 0 unless $po->parse($file)
649 1 1 if ref $l10n->{$dom} ne "HASH"
650 2 0 if ref $l10n->{$dom}{$lang} ne "HASH"
672 4 0 if defined $locale
689 4 0 if defined $locale
702 2 0 if defined $locale
719 2 0 if defined $locale
729 2 0 if defined $locale
731 2 0 if defined $locale
736 0 2 if exists $def->{'currency'} and defined $def->{'currency'} and $def->{'currency'} eq "EUR"
737 0 2 if exists $lconv->{'currency_symbol'} and defined $lconv->{'currency_symbol'} and $lconv->{'currency_symbol'} eq "EUR"
738 2 0 if exists $lconv->{'grouping'} and defined $lconv->{'grouping'}
739 2 0 if exists $lconv->{'mon_grouping'} and defined $lconv->{'mon_grouping'}