Condition Coverage

blib/lib/Net/IPAddress/Util.pm
Criterion Covered Total %
condition 36 74 48.6


and 3 conditions

line !l l&&!r l&&r condition
94 5 10 1 not grep({$_;} @$normal[0..7]) and grep({$normal->[$_] == $SIIT[not !$do][$_];} 8..11) == 4
119 2077 29 1 !ref($address) && $address =~ /$siit_fourish/u && !($address =~ /$fourish/u)
138 545 612 950 ref $address eq 'ARRAY' and @$address == 16
545 0 612 ref $address eq 'ARRAY' and @$address == 4
51 0 494 ref $address and eval { do { $address->isa('Net::IPAddress::Util') } }
20 0 0 $opt{'promote'} and $address =~ /$numberish/u
0 0 0 0 <= $address and $address <= 4294967295
20 0 0 $opt{'promote'} and $address =~ /$numberish/u and (0 <= $address and $address <= 4294967295)
0 16 0 $address =~ /$sixish/u and scalar grep({/::/ou;} split(/[[:alnum:]]+/u, $address, 0)) == 1 || scalar grep({/[[:alnum:]]+/u;} split(/:/u, $address, 0)) == 8
597 0 0 0 defined $_ and $_ >= 0
0 0 0 defined $_ and $_ >= 0 and $_ <= 255

or 2 conditions

line l !l condition
85 0 16 $do //= 1
227 0 0 ref $address || 'bare scalar'
294 94 178 $x ||= '0'
570 0 0 $_ // []

or 3 conditions

line l !l&&r !l&&!r condition
110 0 2107 0 ref $self || $self
119 0 1 2106 $opt{'SIIT'} ||= !ref($address) && $address =~ /$siit_fourish/u && !($address =~ /$fourish/u)
127 0 2 2105 $opt{'promote'} // $PROMOTE_N32
138 30 1 20 $address =~ /$fourish/u or $address =~ /$siit_fourish/u
14 2 0 scalar grep({/::/ou;} split(/[[:alnum:]]+/u, $address, 0)) == 1 || scalar grep({/[[:alnum:]]+/u;} split(/:/u, $address, 0)) == 8
318 432 0 0 eval { do { $rhs->{'address'} } } || pack('N4', (0, 0, 0, $rhs))
321 0 366 66 $lhs->[0] <=> $rhs->[0] || $lhs->[1] <=> $rhs->[1] || $lhs->[2] <=> $rhs->[2] || $lhs->[3] <=> $rhs->[3]
335 0 32 0 eval { do { $rhs->{'address'} } } || pack('N4', (0, 0, 0, $rhs))
362 0 16 0 eval { do { $rhs->{'address'} } } || pack('N4', (0, 0, 0, $rhs))
426 282 0 0 eval { do { $rhs->{'address'} } } || pack('N4', (0, 0, 0, $rhs))
444 282 0 0 eval { do { $rhs->{'address'} } } || pack('N4', (0, 0, 0, $rhs))