Condition Coverage

blib/lib/Net/IPAddress/Util.pm
Criterion Covered Total %
condition 28 69 40.5


and 3 conditions

line !l l&&!r l&&r condition
58 0 0 0 not grep({$_;} @$old[0..9]) and $old->[10] == 255
0 0 0 not grep({$_;} @$old[0..9]) and $old->[10] == 255 and $old->[11] == 255
91 272 306 475 ref $address eq 'ARRAY' and @$address == 16
272 0 306 ref $address eq 'ARRAY' and @$address == 4
25 0 247 ref $address and eval { do { $address->isa('Net::IPAddress::Util') } }
10 0 0 $REPAIR_V3_FORMAT and $address =~ /$broken_fourish/
9 0 1 $PROMOTE_N32 and $address =~ /$numberish/
9 0 1 $PROMOTE_N32 and $address =~ /$numberish/ and $address >= 0
0 0 1 $PROMOTE_N32 and $address =~ /$numberish/ and $address >= 0 and $address <= 4294967295
0 8 0 $address =~ /$sixish/ and scalar grep({/::/o;} split(/[[:alnum:]]+/, $address, 0)) == 1 || scalar grep({/[[:alnum:]]+/;} split(/:/, $address, 0)) == 8
201 2 0 774 $octets[8] == 255 && $octets[9] == 255 && $octets[10] == 0 && $octets[11] == 0 && !grep({$_;} @octets[0..7])
555 0 0 0 defined $_ and $_ >= 0
0 0 0 defined $_ and $_ >= 0 and $_ <= 255

or 2 conditions

line l !l condition
185 0 0 ref $address || 'bare scalar'
256 47 89 $x ||= '0'
528 0 0 $_ // []

or 3 conditions

line l !l&&r !l&&!r condition
85 0 1053 0 ref $self || $self
91 7 1 0 scalar grep({/::/o;} split(/[[:alnum:]]+/, $address, 0)) == 1 || scalar grep({/[[:alnum:]]+/;} split(/:/, $address, 0)) == 8
280 216 0 0 eval { do { $rhs->{'address'} } } || pack('N4', (0, 0, 0, $rhs))
283 0 183 33 $lhs->[0] <=> $rhs->[0] || $lhs->[1] <=> $rhs->[1] || $lhs->[2] <=> $rhs->[2] || $lhs->[3] <=> $rhs->[3]
297 0 16 0 eval { do { $rhs->{'address'} } } || pack('N4', (0, 0, 0, $rhs))
322 0 8 0 eval { do { $rhs->{'address'} } } || pack('N4', (0, 0, 0, $rhs))
384 141 0 0 eval { do { $rhs->{'address'} } } || pack('N4', (0, 0, 0, $rhs))
402 141 0 0 eval { do { $rhs->{'address'} } } || pack('N4', (0, 0, 0, $rhs))