Branch Coverage

lib/Jacode4e/RoundTrip.pm
Criterion Covered Total %
branch 27 48 56.2


line true false branch
141 0 28 if $] < "5.006"
965 0 2774071 if (ref $_[0] ne "SCALAR")
968 0 2774071 unless (exists $x{$OUTPUT_encoding})
971 0 2774071 unless (exists $x{$INPUT_encoding})
977 1653042 1121029 if ($INPUT_encoding =~ /^(?:cp932x|cp932|cp932ibm|cp932nec|sjis2004|cp00930|keis78|keis83|keis90|jef|jef9p|jipsj|jipse|letsj)$/)
978 1653009 33 if (defined $option->{'INPUT_LAYOUT'})
981 1653009 0 if ($INPUT_LAYOUT =~ /^[SD]*$/) { }
992 1653185 1121153 if (defined $INPUT_LAYOUT) { }
999 2774234 104 if (not defined $last_ctype or $ctype ne $last_ctype)
1000 76 2774158 if ($option->{'OUTPUT_SHIFTING'})
1007 2774338 0 if (defined $input_octets)
1008 70 2774268 if (defined $option->{'OVERRIDE_MAPPING'}{$input_octets}) { }
1013 3596 2770672 if (not defined $char) { }
451 2770221 elsif ($char eq "\363\260\204\200") { }
1014 21 3575 if (defined $option->{'GETA'}) { }
1022 21 430 if (defined $option->{'SPACE'}) { }
1031 0 2770221 if (not defined $output_octets or $output_octets eq '') { }
1032 0 0 if (defined $option->{'GETA'}) { }
1058 0 0 if ($version ne $Jacode4e::RoundTrip::VERSION)
1067 0 0 if ($0 eq "/root/.cpan/build/Jacode4e-RoundTrip-2.13.81.12-0/t/../lib/Jacode4e/RoundTrip.pm" and defined $ARGV[0] and $ARGV[0] eq "--dumptable")
1077 0 0 unless open FILE, ">$0-$Jacode4e::RoundTrip::VERSION.TABLE.\U$encoding\E.txt"
1087 0 0 if (grep((!/\343\200\200/), @line) >= 1)
1101 0 0 unless open FILE, ">$0-$Jacode4e::RoundTrip::VERSION.TABLE.CP932X.txt"
1116 0 0 if (grep((!/\343\200\200/), @line) >= 1)