| blib/lib/Jcode.pm | |||
|---|---|---|---|
| Criterion | Covered | Total | % |
| condition | 30 | 48 | 62.5 |
| line | !l | l&&!r | l&&r | condition |
|---|---|---|---|---|
| 36 | 13 | 0 | 42 | $euc > $sjis && $euc > $utf8 |
| 0 | 7 | 6 | $sjis > $euc && $sjis > $utf8 | |
| 0 | 0 | 7 | $utf8 > $euc && $utf8 > $sjis | |
| 3 | 0 | 3 | defined $kin and ref $kin eq 'ARRAY' |
| line | l | !l | condition |
|---|---|---|---|
| 36 | 50 | 0 | $code || getcode($r_str) || 'euc' |
| 6 | 0 | shift() || 72 | |
| 5 | 1 | shift() || "\n" | |
| 1 | 2 | shift() || '' | |
| 0 | 12 | shift() || "\n" | |
| 0 | 12 | shift() || 76 | |
| 206 | 0 | $code || getcode($r_str) || 'euc' | |
| 2 | 8 | $_[2] || '' | |
| 8 | 1 | $match || 0 |
| line | l | !l&&r | !l&&!r | condition |
|---|---|---|---|---|
| 36 | 4 | 4 | 0 | $wordstmp[$i] =~ /^[\x21-\x7E]+$/ || $wordstmp[$i + 1] =~ /^[\x21-\x7E]+$/ |
| 40 | 10 | 0 | $jname2e{$icode} || $icode | |
| 0 | 0 | 50 | &Encode::is_utf8($$r_str) or $icode eq 'binary' | |
| 83 | 0 | 0 | defined $icode or $icode = getcode($r_str) | |
| 152 | 54 | 0 | $jname2e{$icode} || $icode | |
| 10 | 0 | 196 | &Encode::is_utf8($$r_str) or $icode eq 'binary' |