Branch Coverage

blib/lib/Net/IPAM/Block.pm
Criterion Covered Total %
branch 71 84 84.5


line true false branch
94 4 373 if ref $input
98 227 146 if $idx >= 0
103 81 65 if $idx >= 0
141 156 26 if ($self->is_cidr)
192 2 13 unless $self->is_cidr
195 7 6 if $self->version == 6
201 4 9 if $n == $bits
229 8 1 wantarray ? :
251 7 3 wantarray ? :
316 1 1 unless $self->is_cidr
342 1 1 unless $self->is_cidr
373 2 2 if $self->version == 6
405 0 0 unless (defined $self->{'iter'})
412 0 0 if ($self->{'iter'}->cmp($self->{'last'}) < 0)
469 6 188 if $_[0]{'base'}->cmp($_[1]{'last'}) == 1
473 72 116 if $_[0]{'last'}->cmp($_[1]{'base'}) == -1
501 4 119 if $_[0]->cmp($_[1]) == 0
504 56 63 if $_[0]->contains($_[1]) or $_[1]->contains($_[0])
507 58 5 if $_[0]->is_disjunct_with($_[1])
535 8 251 if (ref $_[1] and $_[1]->isa("Net::IPAM::IP"))
539 249 2 if (ref $_[1] and $_[1]->isa("Net::IPAM::Block"))
569 1 16 unless (@_)
570 1 0 wantarray ? :
580 6 58 if $outer->is_disjunct_with($b)
583 4 54 if ($outer->cmp($b) == 0)
584 2 2 wantarray ? :
588 2 52 if ($b->contains($outer))
589 2 0 wantarray ? :
593 36 16 if ($outer->{'base'}->cmp($b->{'base'}) >= 0)
599 16 0 if ($outer->{'base'}->cmp($b->{'base'}) < 0)
616 0 52 unless (defined $outer->{'base'})
617 0 0 wantarray ? :
621 2 50 if ($outer->{'base'}->cmp($outer->{'last'}) > 0)
622 2 0 wantarray ? :
630 5 3 wantarray ? :
651 0 513 unless $Net::IPAM::Block::a->[1]->cmp($Net::IPAM::Block::b->[1])
671 1 12 if @_ <= 1
683 0 105 unless defined $_
688 3 102 if ($prev->overlaps_with($_))
695 44 58 if (defined $next and $next->cmp($_->{'base'}) == 0)
701 9 49 if ($prev->is_disjunct_with($_))
709 9 3 wantarray ? :