| line |
true |
false |
branch |
|
24
|
1 |
11 |
unless defined $str |
|
31
|
1509 |
1502 |
if ($in_ascii) { } |
|
32
|
758 |
751 |
if ($str =~ s/^([\x00-\x7D\x7F]+)//) { } |
|
|
0 |
751 |
elsif ($str =~ s/^\x7E\x7E//) { } |
|
|
0 |
751 |
elsif ($str =~ s/^\x7E\cJ//) { } |
|
|
751 |
0 |
elsif ($str =~ s/^\x7E\x7B//) { } |
|
52
|
751 |
751 |
if ($str =~ s/^((?:[\x21-\x77][\x21-\x7E])+)//) { } |
|
|
751 |
0 |
elsif ($str =~ s/^\x7E\x7D//) { } |
|
64
|
6 |
5 |
if $chk |
|
84
|
0 |
0 |
if $trm eq '~' |
|
88
|
0 |
0 |
if ($in_ascii) { } |
|
89
|
0 |
0 |
if ($src =~ s/^([\x00-\x7D\x7F])//) { } |
|
|
0 |
0 |
elsif ($src =~ s/^\x7E\x7E//) { } |
|
|
0 |
0 |
elsif ($src =~ s/^\x7E\cJ//) { } |
|
|
0 |
0 |
elsif ($src =~ s/^\x7E\x7B//) { } |
|
107
|
0 |
0 |
if ($src =~ s/^((?:[\x21-\x77][\x21-\x7F])+)//) { } |
|
|
0 |
0 |
elsif ($src =~ s/^\x7E\x7D//) { } |
|
119
|
0 |
0 |
unless defined $now |
|
123
|
0 |
0 |
if ($now eq $trm) |
|
139
|
1 |
490 |
unless defined $str |
|
148
|
1482 |
29956 |
if ($str =~ s/^([[:ascii:]]+)//) { } |
|
|
29956 |
0 |
elsif ($str =~ s/(.)//) { } |
|
151
|
994 |
488 |
unless ($in_ascii) |
|
160
|
0 |
29956 |
unless defined $tmp |
|
161
|
29954 |
2 |
if (length $tmp == 2) { } |
|
|
2 |
0 |
elsif (length $tmp) { } |
|
162
|
996 |
28958 |
if ($in_ascii) |
|
169
|
0 |
2 |
unless ($in_ascii) |
|
180
|
484 |
6 |
if $chk |
|
186
|
2 |
488 |
unless ($in_ascii) |