| line |
true |
false |
branch |
|
28
|
1 |
12 |
unless defined $str |
|
29
|
1 |
11 |
if $str eq '' |
|
34
|
11 |
0 |
if ($charset =~ /^([-0-9A-Za-z_]+)$/i) { } |
|
51
|
4 |
7 |
if ($cs ne 'utf-8') |
|
53
|
2 |
2 |
if ($cs eq 'iso-2022-jp') { } |
|
|
2 |
0 |
elsif ($cs eq 'shift_jis') { } |
|
|
0 |
0 |
elsif ($cs eq 'gb2312') { } |
|
|
0 |
0 |
elsif ($cs eq 'euc-kr') { } |
|
|
0 |
0 |
elsif ($cs eq 'big5') { } |
|
78
|
2 |
9 |
$jp ? : |
|
82
|
28 |
30 |
if ($odd) { } |
|
98
|
4 |
18 |
if $str eq '' |
|
104
|
5 |
13 |
if $str_len <= $BPL |
|
120
|
7 |
6 |
if $UTF8 |
|
124
|
255 |
168 |
if $UTF8 |
|
126
|
17 |
406 |
if ($chunk_len + $w_len > $max_len) { } |
|
130
|
13 |
4 |
if ($str_len - $str_pos <= $max_len) |
|
131
|
7 |
6 |
if $UTF8 |
|
150
|
2 |
6 |
if $str eq '' |
|
154
|
0 |
6 |
if length $str <= $BPL |
|
174
|
20 |
205 |
if (defined $ec) { } |
|
176
|
8 |
12 |
if ($ec eq '(B') { } |
|
|
8 |
4 |
elsif ($ec eq '$B') { } |
|
188
|
21 |
184 |
if ($k_in == 1) { } |
|
|
21 |
163 |
elsif ($k_in == 2) { } |
|
196
|
30 |
154 |
$k_in ? : |
|
197
|
10 |
174 |
if (pos($str) + $k_out > $max_len) |
|
199
|
4 |
6 |
if ($k_in_bak) { } |
|
202
|
4 |
0 |
if ($k_in) { } |
|
203
|
4 |
0 |
if ($k_in_bak == $k_in) |
|
217
|
6 |
4 |
if (length $str <= $max_len) |