Branch Coverage

blib/lib/Net/DHCP/Info.pm
Criterion Covered Total %
branch 29 44 65.9


line true false branch
68 3 0 if (ref $file eq 'GLOB') { }
72 0 0 unless -f $file
73 0 0 unless -r $file
74 0 0 unless open my $self, '<', $file
92 1 1 if (my($tab, @ip) = /$FIND_NET/mx)
103 1 3 if (/$ROUTERS/mx) { }
1 2 elsif (my(@net) = /$RANGE/mx) { }
1 1 elsif (/$tab\}/mx) { }
107 0 1 unless $net[1]
115 1 0 ref $net ? :
130 2 0 if (my($ip) = /$FIND_LEASE/mx)
141 2 12 if (/$STARTS/mx) { }
2 10 elsif (/$ENDS/mx) { }
2 8 elsif (/$HW_ETHERNET/mx) { }
0 8 elsif (/$REMOTE_ID/mx) { }
0 8 elsif (/$CIRCUIT_ID/mx) { }
2 6 elsif (/$BINDING/mx) { }
2 4 elsif (/$HOSTNAME/mx) { }
2 2 elsif (/$END/mx) { }
167 2 0 ref $lease ? :
182 0 2 if $mac =~ /[\x00-\x1f]/mx
186 0 12 $i < 0 ? :