| line |
true |
false |
branch |
|
30
|
1507 |
1502 |
if ($in_ascii) { } |
|
31
|
756 |
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//) { } |
|
51
|
751 |
751 |
if ($str =~ s/^((?:[\x21-\x77][\x21-\x7E])+)//) { } |
|
|
751 |
0 |
elsif ($str =~ s/^\x7E\x7D//) { } |
|
62
|
6 |
3 |
if $chk |
|
82
|
0 |
0 |
if $trm eq '~' |
|
86
|
0 |
0 |
if ($in_ascii) { } |
|
87
|
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//) { } |
|
105
|
0 |
0 |
if ($src =~ s/^((?:[\x21-\x77][\x21-\x7F])+)//) { } |
|
|
0 |
0 |
elsif ($src =~ s/^\x7E\x7D//) { } |
|
117
|
0 |
0 |
unless defined $now |
|
121
|
0 |
0 |
if ($now eq $trm) |
|
145
|
1480 |
29954 |
if ($str =~ s/^([[:ascii:]]+)//) { } |
|
|
29954 |
0 |
elsif ($str =~ s/(.)//) { } |
|
148
|
994 |
486 |
unless ($in_ascii) |
|
157
|
0 |
29954 |
unless defined $tmp |
|
158
|
29954 |
0 |
if (length $tmp == 2) { } |
|
|
0 |
0 |
elsif (length $tmp) { } |
|
159
|
996 |
28958 |
if ($in_ascii) |
|
166
|
0 |
0 |
unless ($in_ascii) |
|
177
|
484 |
4 |
if $chk |
|
183
|
2 |
486 |
unless ($in_ascii) |