Branch Coverage

blib/lib/Net/IPAM/Util.pm
Criterion Covered Total %
branch 34 36 94.4


line true false branch
60 4 10 if $i == 0
101 4 10 if $i == 0
131 8 11 if $v == 2
149 20 58 if $v == 2
150 10 48 if $_[0] =~ /^::ffff:/i
156 0 8 if length $_[0] != 4
178 0 11 if length $n != 16
189 8 3 unless $ip =~ /^::/
190 9 2 unless $ip =~ /::$/
202 16 14 unless $_[0] eq join(".", unpack("C4", $n))
217 2 46 if $ip =~ /[^a-fA-F0-9:]/
218 4 42 if $ip =~ /:::/
221 2 40 if $ip =~ /^:[^:]/
224 2 38 if $ip =~ /[^:]:$/
229 4 34 if $col_count > 7
230 6 28 if $dbl_col_count > 1
231 4 24 if $dbl_col_count == 0 and $col_count != 7
242 2 22 if grep {length $_ > 4;} @hextets