line |
true |
false |
branch |
29
|
3 |
8 |
if $negative |
33
|
1 |
1 |
if ($negative) |
43
|
2 |
0 |
if $length == 6 or $length == 12 |
55
|
12 |
18 |
if $negative |
59
|
4 |
8 |
if ($negative) |
67
|
0 |
6 |
unless inet_ntoa($_[0]) |
95
|
0 |
23 |
@_ > 1 ? : |
97
|
1 |
22 |
if $bin =~ /^[^\t\n\r\x20-\xEF]/ |
124
|
0 |
2 |
unless $bin =~ s/^.(.)//s |
128
|
0 |
2 |
unless $bin =~ s/^(.{$length})//s |
136
|
2 |
0 |
if ($bin =~ s/^(.{$length})//s) |
141
|
0 |
2 |
if $length = length $bin |
147
|
3 |
0 |
$bin =~ s/^.(.)//s ? : |
150
|
3 |
0 |
if ($bin =~ s/^(.{$length})//s) |
158
|
0 |
7 |
unless $bin =~ s/^(.{$length})//s |
162
|
0 |
3 |
if length $bin |
163
|
0 |
3 |
unless defined $id |
168
|
48 |
95 |
if lc $_[0] eq "short int" |
169
|
39 |
56 |
if lc $_[0] eq "int" |
170
|
0 |
56 |
if lc $_[0] eq "long int" |
171
|
56 |
0 |
if lc $_[0] eq "char" |
172
|
0 |
0 |
if lc $_[0] eq "float" |
173
|
0 |
0 |
if lc $_[0] eq "double" |
174
|
0 |
0 |
if lc $_[0] eq "long double" |
175
|
0 |
0 |
if lc $_[0] eq "md5digest" |
181
|
32 |
4 |
if ($length <= 128) { } |
|
0 |
4 |
elsif ($length == 129) { } |
|
4 |
0 |
elsif ($length == 130) { } |
206
|
0 |
130 |
if ($subid & 4261412864) |
212
|
126 |
4 |
unless ($id & 128) |
213
|
0 |
126 |
if 128 <= @oid |
220
|
10 |
2 |
if ($oid[1] == 43) { } |
|
0 |
2 |
elsif ($oid[1] < 40) { } |
|
2 |
0 |
elsif ($oid[1] < 80) { } |
245
|
0 |
145 |
unless ($length) |
248
|
143 |
2 |
if ($_[2]) |
250
|
0 |
143 |
if $max < $length |
258
|
88 |
0 |
$type =~ /C/ ? : |
260
|
88 |
0 |
if $$bin_ref =~ s/^(.{$n})//s |