Branch Coverage

blib/lib/Locale/Maketext/Lexicon/Getcontext.pm
Criterion Covered Total %
branch 28 52 53.8


line true false branch
36 0 4 unless defined $_[0]
39 0 4 if $_[0] =~ /^\x95\x04\x12\xde/ or $_[0] =~ /^\xde\x12\x04\x95/
50 1735 0 if (length $var{'msgstr'} and $UseFuzzy || !$var{'fuzzy'}) { }
0 0 elsif ($AllowEmpty) { }
56 4 1731 if ($var{'msgctxt'} eq '') { }
62 0 0 if ($KeepFuzzy and $var{'fuzzy'})
98 1735 0 /^ *$/ && %var ? :
0 1735 /^#, +(.*) *$/ ? :
0 1735 /^# (.*)$/ ? :
767 1735 /^"(.*)" *$/ ? :
5201 2502 /^(msgctxt|msgid|msgstr) +"(.*)" *$/ ? :
108 0 4 if keys %var != 0
111 0 4 if length $var{'msgstr'}
113 4 0 if $var{'msgctxt'} eq ''
116 0 4 wantarray ? :
132 4 28 $1 eq 'Content-Type' ? :
32 0 /^([^\x00-\x1f\x80-\xff :=]+):\s*(.*)$/ ? :
134 4 0 if ($enc =~ /\bcharset=\s*([-\w]+)/i)
139 4 0 if $InputEncoding =~ /^utf-?8$/i
141 0 4 if $OutputEncoding =~ /^utf-?8$/i
143 4 0 if (Locale::Maketext::Lexicon::option('decode') and !$OutputEncoding || $InputEncoding ne $OutputEncoding)
148 0 4 if $] < 5.007001
170 3466 12 if ($DoEncoding and $InputEncoding)
171 3466 0 $InputEncoding eq 'utf8' ? :
179 0 3478 if ($DoEncoding and $OutputEncoding)
180 0 0 $OutputEncoding eq 'utf8' ? :