| line |
true |
false |
branch |
|
24
|
0 |
0 |
if @_ |
|
32
|
0 |
9 |
unless (&_include_disallowed_names($str)) |
|
40
|
0 |
9 |
if (length $compressed > 36) |
|
55
|
0 |
9 |
unless $str =~ s/^$_prefix_tag// |
|
64
|
0 |
9 |
unless (&_include_disallowed_names($decompressed)) |
|
76
|
2 |
7 |
if (@unique_upper_octet > 2 or @unique_upper_octet == 2 and not grep({$_ eq "\000";} @unique_upper_octet)) |
|
85
|
5 |
2 |
@unique_upper_octet == 1 ? : |
|
86
|
0 |
7 |
if ($u1 =~ /^[\xd8-\xdc]{1}$/) |
|
94
|
0 |
23 |
if ($u2 eq "\000" and $n1 eq "\231") { } |
|
|
20 |
3 |
elsif ($u2 eq $u1 and $n1 ne "\377") { } |
|
|
1 |
2 |
elsif ($u2 eq $u1 and $n1 eq "\377") { } |
|
114
|
0 |
9 |
if (length $str == 1) |
|
118
|
2 |
7 |
if ($u1 eq "\330") |
|
121
|
0 |
2 |
if (length($lcheck) % 2) |
|
126
|
0 |
2 |
if (@unique_upper_octet == 1 or @unique_upper_octet == 2 and grep {$_ eq "\000";} @unique_upper_octet) |
|
139
|
7 |
23 |
if ($pos == length $rest) |
|
141
|
0 |
7 |
if (length($buffer) % 2) |
|
148
|
3 |
20 |
if ($n1 eq "\377") { } |
|
|
0 |
37 |
elsif ($u1 eq "\000" and $n1 eq "\231") { } |
|
150
|
0 |
3 |
if ($pos == length($rest) - 1) |
|
156
|
1 |
2 |
if ($n1 eq "\231") |