Condition Coverage

blib/lib/Net/DRI/Registry.pm
Criterion Covered Total %
condition 44 138 31.8


and 3 conditions

line !l l&&!r l&&r condition
116 0 57 0 defined $name && exists $$self{'profiles'}{$name}
133 0 0 51 defined $what and exists $$self{'profiles'}{$$self{'profile'}}{$what}
135 41 0 10 $what eq 'status' and $tostore
151 0 0 14 $self and $f
164 0 0 3 $f and $rc->can($f)
238 0 0 28 defined $what and $what
269 0 0 0 defined $rh and ref $rh
0 0 0 defined $rh and ref $rh and keys %$rh
288 0 0 1 $profile and exists $$self{'profiles'}{$profile}
305 0 0 0 $profile and exists $$self{'profiles'}{$profile}
322 0 0 0 defined $ac and ref $ac
349 0 57 0 defined $trans_p and ref $trans_p ne 'HASH'
350 34 23 0 defined $prot_p and ref $prot_p ne 'HASH'
355 0 0 57 exists $INC{'Test/More.pm'} and defined $trans_p
0 0 57 exists $INC{'Test/More.pm'} and defined $trans_p and exists $$trans_p{'f_send'}
391 1 0 0 defined $rc and not $rc->is_success
415 0 0 0 ref $$p{'protocol'} and $$p{'protocol'}->can('end')
416 0 0 0 ref $$p{'transport'} and $$p{'transport'}->can('end')
428 0 0 1 ref $$p{'transport'} and $$p{'transport'}->can('end')
429 0 1 0 ref $$p{'protocol'} and $$p{'protocol'}->can('end')
488 0 0 10 defined $pause and $pause
0 10 0 defined $pause and $pause and $count > 1
505 0 10 0 defined $r and $r
509 0 0 0 !ref($err) && $err =~ /timeout/
556 10 0 0 exists $$ri{'_internal'} and exists $$ri{'_internal'}{'must_reconnect'}
10 0 0 exists $$ri{'_internal'} and exists $$ri{'_internal'}{'must_reconnect'} and $$ri{'_internal'}{'must_reconnect'}
575 0 10 10 $oname and $type eq $otype
10 0 10 $oname and $type eq $otype and $key eq $oname
581 0 0 10 $oname and $otype
584 0 0 10 exists $$ri{$otype} and exists $$ri{$otype}{$oname}
611 10 0 0 $otype eq 'account' and $oaction eq 'list_domains'
626 0 0 7 $op and $subop
630 0 0 7 $cap and ref $cap eq 'HASH'
0 0 7 $cap and ref $cap eq 'HASH' and exists $$cap{$op}
0 0 7 $cap and ref $cap eq 'HASH' and exists $$cap{$op} and ref $$cap{$op} eq 'HASH'
0 0 7 $cap and ref $cap eq 'HASH' and exists $$cap{$op} and ref $$cap{$op} eq 'HASH' and exists $$cap{$op}{$subop}
0 0 7 $cap and ref $cap eq 'HASH' and exists $$cap{$op} and ref $$cap{$op} eq 'HASH' and exists $$cap{$op}{$subop} and ref $$cap{$op}{$subop} eq 'ARRAY'
634 3 0 4 defined $action and $action
662 0 0 13 ref $drd and $drd->can($attr)

or 2 conditions

line l !l condition
108 0 0 $full ||= 0
308 0 0 $otype ||= '_default'
309 0 0 $oaction ||= '_default'

or 3 conditions

line l !l&&r !l&&!r condition
202 5 0 0 not defined $a or $a ne $action
363 0 0 57 not Net::DRI::Util::all_valid($tc, $tp, $pc, $pp) or ref $tp ne 'HASH'
0 0 57 not Net::DRI::Util::all_valid($tc, $tp, $pc, $pp) or ref $tp ne 'HASH' or ref $pp ne 'HASH'
440 145 11 124 $self->SUPER::can($what) || $self->driver->can($what)
556 0 0 10 $rc->is_closing or exists $$ri{'_internal'} and exists $$ri{'_internal'}{'must_reconnect'} and $$ri{'_internal'}{'must_reconnect'}