Branch Coverage

blib/lib/Encode/ShiftJIS2004.pm
Criterion Covered Total %
branch 12 42 28.5


line true false branch
77 0 2 if (ref $chk eq 'CODE')
88 2 31 unless $chunk =~ /./so or $mc =~ /./so
90 11 20 if ($chunk =~ /./so)
93 0 31 if ($chunk =~ /./so)
98 29 2 if ($mc =~ /./so)
104 0 0 if ($chk & $DIE_ON_ERR)
107 0 0 if ($chk & $WARN_ON_ERR)
110 0 0 if ($chk & $RETURN_ON_ERR)
114 0 0 if ($chk_sub) { }
0 0 elsif ($chk & $XMLCREF) { }
0 0 elsif ($chk & $HTMLCREF) { }
126 2 0 unless $chk & $LEAVE_SRC
134 0 2 if (ref $chk eq 'CODE')
143 2 0 unless length $str
146 0 0 if ($str =~ /^([\x81-\x9F\xE0-\xFC][\x40-\x7E\x80-\xFC])/) { }
151 0 0 if ($chk & $DIE_ON_ERR)
154 0 0 if ($chk & $WARN_ON_ERR)
157 0 0 if ($chk & $RETURN_ON_ERR)
162 0 0 if ($chk_sub) { }
0 0 elsif ($chk & $PERLQQ) { }
170 2 0 unless $chk & $LEAVE_SRC