Branch Coverage

blib/lib/Locale/Maketext/Test.pm
Criterion Covered Total %
branch 47 68 69.1


line true false branch
182 1 5 unless (scalar @{$self->languages;})
184 1 0 if (opendir my $dh, $self->directory)
186 3 2 if (my($x) = $_ =~ /^(\w+)\.po$/u)
219 7 0 if $po->{'header'}{'plural-forms'} =~ /\bnplurals=(\d+);/u
224 13 0 unless (defined $plural[$pos])
236 4 3 if ($lang_plural_is_like_english)
238 4 400000 if $i == 1
239 0 400000 if (&$plural_sub($i) == 0)
253 1 0 unless @_ == $nplurals + 2
275 2 0 if ($_[$i] =~ /%d/u) { }
280 0 0 unless $i == 2 and $lang_plural_is_like_english
283 1 0 if ($found_percent_d)
284 0 1 if (@no_percent_d > 1) { }
0 1 elsif (@no_percent_d == 1) { }
301 2 27 if not defined $_ and $self->debug
302 16 13 defined $_ && $_ eq 'text' ? :
309 0 6 if (/Can't locate object method "([^"]+)" via package/u) { }
352 0 84 $2 ? :
0 84 $1 ? :
381 0 17 if ($+{'esc'}) { }
0 17 elsif ($+{'simplefunc'}) { }
386 1 16 $+{'func'} ? :
387 1 16 $+{'func'} && $+{'func'} eq 'plural' ? :
388 1 16 $+{'func'} ? :
397 49 193 if @stack
411 28 0 if ($l =~ /^\s*msgstr\s*"(.*)"/u)
414 84 21 if ($l =~ /^\s*"(.*)"/u) { }
430 8 0 unless ($lang =~ /\.po$/u)
437 1 7 unless open my $f, '<:encoding(UTF-8)', $lang
440 28 39 if ($l =~ /^\s*msgid\s*"(.*)"/u)
444 0 28 if ($l =~ /^\s*"(.*)"/u) { }
448 7 21 if ($first) { }
21 0 elsif (length $line) { }
451 0 7 if $header_only