Branch Coverage

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


line true false branch
184 1 5 unless (scalar @{$self->languages;})
186 1 0 if (opendir my $dh, $self->directory)
188 3 2 if (my($x) = $_ =~ /^(\w+)\.po$/u)
221 7 0 if $po->{'header'}{'plural-forms'} =~ /\bnplurals=(\d+);/u
226 13 0 unless (defined $plural[$pos])
238 4 3 if ($lang_plural_is_like_english)
240 4 400000 if $i == 1
241 0 400000 if (&$plural_sub($i) == 0)
255 1 0 unless @_ == $nplurals + 2
277 2 0 if ($_[$i] =~ /%d/u) { }
282 0 0 unless $i == 2 and $lang_plural_is_like_english
285 1 0 if ($found_percent_d)
286 0 1 if (@no_percent_d > 1) { }
0 1 elsif (@no_percent_d == 1) { }
303 2 27 if not defined $_ and $self->debug
304 16 13 defined $_ && $_ eq 'text' ? :
311 0 6 if (/Can't locate object method "([^"]+)" via package/u) { }
354 0 84 $2 ? :
0 84 $1 ? :
383 0 17 if ($+{'esc'}) { }
0 17 elsif ($+{'simplefunc'}) { }
388 1 16 $+{'func'} ? :
389 1 16 $+{'func'} && $+{'func'} eq 'plural' ? :
390 1 16 $+{'func'} ? :
399 49 193 if @stack
412 28 0 if ($l =~ /^\s*msgstr\s*"(.*)"/u)
415 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