Branch Coverage

blib/lib/DOCSIS/ConfigFile/Encode.pm
Criterion Covered Total %
branch 37 70 52.8


line true false branch
26 0 1 if $int64->is_nan
29 0 1 $negative ? :
34 0 8 if $negative
38 1 0 @bytes ? :
44 0 7 if ($string =~ qr/^\+?[0-4294967295]$/) { }
7 0 elsif ($string =~ /^(?:0x)?([0-9a-f]+)$/i) { }
60 0 23 if $string
78 4 12 if $negative
82 2 5 unless ($obj->{'snmp'})
83 1 1 if $negative
86 0 7 if (@bytes == 0)
89 5 2 if ($obj->{'snmp'})
90 0 5 if not $negative and $bytes[0] > 121
107 0 11 unless my $type = $SNMP_TYPE{uc $obj->{'type'}}
111 0 11 unless (@value)
129 3 18 if $string =~ /^0x[a-f0-9]+$/i
136 2 0 if @bytes == 0 or $bytes[-1] ne "\0"
153 52 0 unless ($obj->{'snmp'})
156 0 52 if (@bytes == 0)
159 0 52 if ($obj->{'snmp'})
160 0 0 if $bytes[0] > 121
171 0 56 if $obj->{'snmp'} and $ushort > 121
179 56 0 unless $obj->{'snmp'}
180 56 0 @bytes ? :
184 0 1 unless $_[0]{'value'}
206 0 1 unless ref $obj->{'nested'} eq "ARRAY"
225 33 0 if $length < 128
226 0 0 if $length < 255
227 0 0 unless $length < 65535
242 0 11 if ($_[0] =~ /[A-Za-z]/)
245 0 0 unless $oid = SNMP::translateObj($oid)
249 0 11 unless length $input_oid[0]
260 109 4 if ($id <= 127) { }
282 0 243 unless defined $obj->{'value'}
284 0 243 if $test and not $obj->{'value'} =~ /$test/