Branch Coverage

lib/IOas/CP932IBM.pm
Criterion Covered Total %
branch 24 32 75.0


line true false branch
18 0 12 if $] < 5.006
28 0 12 if (defined $_[0] and $_[0] =~ /\A[0123456789]/)
29 0 0 if ($_[0] != $IOas::CP932IBM::VERSION)
70 9 9 @_ ? :
79 2 4 if (@_ == 4) { }
2 2 elsif (@_ == 3) { }
116 2 2 @_ ? :
118 4 0 if ($io_encoding =~ /^(?:cp932ibm|cp932|cp932ibm|cp932nec|sjis2004)$/)
119 4 0 if ($octet =~ /\A[\x81-\x9F\xE0-\xFC]\z/)
123 0 4 if ($io_encoding eq 'cp932x' and $octet eq "\234Z")
133 22 2 @_ ? :
134 2 22 wantarray ? :
138 8 2 @_ >= 1 && defined fileno &Symbol::qualify_to_ref($_[0], scalar caller()) ? :
139 8 2 @_ ? :
143 10 10 @_ >= 1 && defined fileno &Symbol::qualify_to_ref($_[0], scalar caller()) ? :
144 20 0 @_ ? :