Branch Coverage

blib/lib/Net/Works/Address.pm
Criterion Covered Total %
branch 17 22 77.2


line true false branch
68 43 84 if (defined $str and inet_pton(2, $str)) { }
70 2 41 if $version == 6
90 0 0 ref $int ? :
112 34 623 if $self->version == 4
114 373 250 if $self->as_integer >= 4294967296
127 4 2 if ($self->version == 6) { }
144 2 3 if $self->as_integer == $self->_max
156 2 2 if $self->as_integer == 0
168 0 211 shift() ? :
175 211 0 if $self->isa('Net::Works::Address')
0 211 unless &blessed($self) and &blessed($other) and eval { do { $other->isa('Net::Works::Address') if $self->isa('Net::Works::Address') } }