| line |
true |
false |
branch |
|
61
|
0 |
65 |
unless defined $input |
|
63
|
16 |
49 |
if (ref $input eq "ARRAY") |
|
73
|
11 |
38 |
unless ($hex) |
|
80
|
16 |
22 |
if length($hex) % 2 != 0 |
|
85
|
7 |
31 |
if $input_length == 1 and ord $hex < 128 |
|
91
|
42 |
5 |
if $length <= 55 |
|
93
|
5 |
0 |
if ($length < "1.84467440737096e+19") |
|
103
|
5 |
5 |
unless $x |
|
127
|
0 |
65 |
unless length $input |
|
132
|
49 |
16 |
if ($type eq "string") |
|
136
|
16 |
33 |
if $hex =~ /^0/u and (length($hex) - 1) % 2 != 0 |
|
158
|
0 |
116 |
unless $length |
|
167
|
13 |
103 |
if ($prefix < 128) { } |
|
|
75 |
28 |
elsif ($prefix <= 183 and $length > $short_string) { } |
|
|
3 |
25 |
elsif ($prefix <= 192 and $length > $long_string and $length > $long_string + $self->_to_integer(substr($input, 1, $long_string))) { } |
|
|
22 |
3 |
elsif ($prefix < 247 and $length > $list) { } |
|
|
3 |
0 |
elsif ($prefix <= 255 and $length > $long_list and $length > $long_list + $self->_to_integer(substr($input, 1, $long_list))) { } |
|
198
|
0 |
30 |
unless $length |
|
200
|
14 |
16 |
if $length == 1 |