Branch Coverage

blib/lib/DOCSIS/ConfigFile/Decode.pm
Criterion Covered Total %
branch 46 78 58.9


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