Branch Coverage

blib/lib/Net/CIDR/Set.pm
Criterion Covered Total %
branch 51 60 85.0


line true false branch
29 0 109 'HASH' eq ref $_[0] ? :
30 0 109 if (defined(my $type = delete $opt->{'type'})) { }
16 93 elsif (ref $self) { }
38 0 109 if @unk
39 85 24 if @_
57 43 149 if ($cmp < 0) { }
97 52 elsif ($cmp > 0) { }
74 677 2313 unless ++$_ == 256
83 157 448 unless $_-- == 0
94 87 41 unless $@
134 0 9 if @found > 1
148 0 15 if ($self->is_empty)
153 8 7 if ($self->{'ranges'}[0] eq $min) { }
160 8 7 if ($self->{'ranges'}[-1] eq $max) { }
181 52 112 if $fpos & 1
182 5 159 if $tpos & 1
191 0 148 unless my($lo, $hi) = $self->_encode($ip)
244 62 85 if $pos >= $limit
315 0 36 unless @_
323 78 36 if (defined $v) { }
326 0 78 unless defined $vv and $vv eq $v
331 0 36 if defined $_->[$pos]
335 36 78 unless defined $v
348 2 1 unless @r
349 1 1 unless $r[0] eq $r[1]
365 24 31 unless @r
366 31 16 unless ($r[0] eq $r[1])
369 3 28 if $pad > $size
373 31 174 if $next le $r[1]
389 42 52 unless my(@r) = &$iter()