Branch Coverage

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


line true false branch
94 4 372 if ref $input
98 227 145 if $idx >= 0
103 80 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 ? :
254 7 2 wantarray ? :
319 1 1 unless $self->is_cidr
345 1 1 unless $self->is_cidr
376 2 2 if $self->version == 6
408 0 0 unless (defined $self->{'iter'})
415 0 0 if ($self->{'iter'}->cmp($self->{'last'}) < 0)
472 6 188 if $_[0]{'base'}->cmp($_[1]{'last'}) == 1
476 72 116 if $_[0]{'last'}->cmp($_[1]{'base'}) == -1
504 4 119 if $_[0]->cmp($_[1]) == 0
507 56 63 if $_[0]->contains($_[1]) or $_[1]->contains($_[0])
510 58 5 if $_[0]->is_disjunct_with($_[1])
538 8 251 if (ref $_[1] and $_[1]->isa("Net::IPAM::IP"))
542 249 2 if (ref $_[1] and $_[1]->isa("Net::IPAM::Block"))
572 1 16 unless (@_)
573 1 0 wantarray ? :
583 6 58 if $outer->is_disjunct_with($b)
586 4 54 if ($outer->cmp($b) == 0)
587 2 2 wantarray ? :
591 2 52 if ($b->contains($outer))
592 2 0 wantarray ? :
596 36 16 if ($outer->{'base'}->cmp($b->{'base'}) >= 0)
602 16 0 if ($outer->{'base'}->cmp($b->{'base'}) < 0)
619 0 52 unless (defined $outer->{'base'})
620 0 0 wantarray ? :
624 2 50 if ($outer->{'base'}->cmp($outer->{'last'}) > 0)
625 2 0 wantarray ? :
633 5 3 wantarray ? :
654 0 511 unless $Net::IPAM::Block::a->[1]->cmp($Net::IPAM::Block::b->[1])
674 1 12 if @_ <= 1
686 0 105 unless defined $_
691 3 102 if ($prev->overlaps_with($_))
698 44 58 if (defined $next and $next->cmp($_->{'base'}) == 0)
704 9 49 if ($prev->is_disjunct_with($_))
712 9 3 wantarray ? :