Condition Coverage

blib/lib/FTN/Addr.pm
Criterion Covered Total %
condition 41 110 37.2


and 3 conditions

line !l l&&!r l&&r condition
151 0 0 14 $base and ref $base
0 0 14 $base and ref $base and &Scalar::Util::blessed($base)
0 0 14 $base and ref $base and &Scalar::Util::blessed($base) and $base->isa('FTN::Addr')
210 0 0 35 _validate_domain($new{'domain'}) and _validate_zone($new{'zone'})
0 0 35 _validate_domain($new{'domain'}) and _validate_zone($new{'zone'}) and _validate_net($new{'net'})
0 0 35 _validate_domain($new{'domain'}) and _validate_zone($new{'zone'}) and _validate_net($new{'net'}) and _validate_node($new{'node'})
0 0 35 _validate_domain($new{'domain'}) and _validate_zone($new{'zone'}) and _validate_net($new{'net'}) and _validate_node($new{'node'}) and _validate_point($new{'point'})
0 35 0 _validate_domain($new{'domain'}) and _validate_zone($new{'zone'}) and _validate_net($new{'net'}) and _validate_node($new{'node'}) and _validate_point($new{'point'}) and $new{'node'} != -1 || $new{'point'} == 0
0 35 0 _validate_domain($new{'domain'}) and _validate_zone($new{'zone'}) and _validate_net($new{'net'}) and _validate_node($new{'node'}) and _validate_point($new{'point'}) and $new{'node'} != -1 || $new{'point'} == 0 and $new{'node'} > 0 || $new{'point'} != -1
225 0 0 37 defined $_[0] and 1 <= $_[0]
230 0 0 37 defined $_[0] and 1 <= $_[0]
235 0 0 37 defined $_[0] and -1 <= $_[0]
240 0 0 38 defined $_[0] and -1 <= $_[0]
540 0 0 5 $_[1] and ref $_[1]
0 0 5 $_[1] and ref $_[1] and &Scalar::Util::blessed($_[1])
0 0 5 $_[1] and ref $_[1] and &Scalar::Util::blessed($_[1]) and $_[1]->isa('FTN::Addr')
545 0 0 5 $_[0]->domain eq $_[1]->domain and $_[0]->zone == $_[1]->zone
0 0 5 $_[0]->domain eq $_[1]->domain and $_[0]->zone == $_[1]->zone and $_[0]->net == $_[1]->net
0 0 5 $_[0]->domain eq $_[1]->domain and $_[0]->zone == $_[1]->zone and $_[0]->net == $_[1]->net and $_[0]->node == $_[1]->node
554 0 0 2 $_[1] and ref $_[1]
0 0 2 $_[1] and ref $_[1] and &Scalar::Util::blessed($_[1])
0 0 2 $_[1] and ref $_[1] and &Scalar::Util::blessed($_[1]) and $_[1]->isa('FTN::Addr')
578 0 0 1 $_[0] and ref $_[0]
0 0 1 $_[0] and ref $_[0] and &Scalar::Util::blessed($_[0])
0 0 1 $_[0] and ref $_[0] and &Scalar::Util::blessed($_[0]) and $_[0]->isa('FTN::Addr')

or 2 conditions

line l !l condition
137 8 13 $5 || 'fidonet'
9 12 $4 || 0
157 0 4 $3 || 0
170 3 6 $2 || 0

or 3 conditions

line l !l&&r !l&&!r condition
112 22 13 0 ref $either || $either
210 35 0 0 $new{'node'} != -1 || $new{'point'} == 0
35 0 0 $new{'node'} > 0 || $new{'point'} != -1
560 0 0 0 $_[1]->domain cmp $_[0]->domain or $_[1]->zone <=> $_[0]->zone
0 0 0 $_[1]->domain cmp $_[0]->domain or $_[1]->zone <=> $_[0]->zone or $_[1]->net <=> $_[0]->net
0 0 0 $_[1]->domain cmp $_[0]->domain or $_[1]->zone <=> $_[0]->zone or $_[1]->net <=> $_[0]->net or $_[1]->node <=> $_[0]->node
566 1 0 1 $_[0]->domain cmp $_[1]->domain or $_[0]->zone <=> $_[1]->zone
1 0 1 $_[0]->domain cmp $_[1]->domain or $_[0]->zone <=> $_[1]->zone or $_[0]->net <=> $_[1]->net
0 0 1 $_[0]->domain cmp $_[1]->domain or $_[0]->zone <=> $_[1]->zone or $_[0]->net <=> $_[1]->net or $_[0]->node <=> $_[1]->node