Branch Coverage

blib/lib/Net/DHCP/Config/Utilities/Subnet.pm
Criterion Covered Total %
branch 27 40 67.5


line true false branch
56 10 0 if (defined $_[1])
61 0 10 if (not defined $args{'base'}) { }
0 10 elsif (not defined $args{'mask'}) { }
72 0 10 if ($@)
76 3 7 unless (defined $args{'desc'})
91 4 6 if (defined $args{'ranges'})
98 0 4 unless (defined $range_split[0] and defined $range_split[1])
107 0 4 unless ($cidr_checker->contains_all($cidr_list[0]))
111 1 3 unless ($cidr_checker->contains_all($cidr_list[0]))
127 0 17 if (defined $args{$key} and (defined $args{$options->{$key}{'long'}} and $args{$key} ne $args{$options->{$key}{'long'}}))
138 0 108 if (defined $args{$options->{$key}{'long'}} and not defined $args{$key})
146 17 91 if (defined $args{$opt})
149 0 17 if (defined $error)
233 0 27 if ($option eq 'mask')
237 6 21 if (defined $self->{'options'}{$option})
278 0 3 unless (defined $option)
282 1 2 if ($option eq 'mask')
287 1 1 unless (defined $value)
288 1 0 if (defined $self->{'options'}{$option})
297 0 1 if (defined $error)