line |
true |
false |
branch |
27
|
0 |
65 |
unless defined $input |
29
|
16 |
49 |
if (ref $input eq "ARRAY") |
39
|
11 |
38 |
unless ($hex) |
46
|
16 |
22 |
if length($hex) % 2 != 0 |
51
|
7 |
31 |
if $input_length == 1 and ord $hex < 128 |
57
|
42 |
5 |
if $length <= 55 |
59
|
5 |
0 |
if ($length < "1.84467440737096e+19") |
69
|
5 |
5 |
unless $x |
75
|
0 |
65 |
unless length $input |
80
|
49 |
16 |
if ($type eq "string") |
84
|
16 |
33 |
if $hex =~ /^0/u and (length($hex) - 1) % 2 != 0 |
106
|
0 |
116 |
unless $length |
115
|
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))) { } |
146
|
0 |
30 |
unless $length |
148
|
14 |
16 |
if $length == 1 |