Branch Coverage

blib/lib/Net/EPP/Simple.pm
Criterion Covered Total %
branch 0 334 0.0


line true false branch
247 0 0 defined $params{'load_config'} ? :
248 0 0 if $load_config
250 0 0 defined $params{'port'} && int $params{'port'} > 0 ? :
251 0 0 $params{'no_ssl'} ? :
258 0 0 defined $params{'debug'} ? :
259 0 0 defined $params{'timeout'} && int $params{'timeout'} > 0 ? :
260 0 0 defined $params{'reconnect'} ? :
263 0 0 exists $params{'connect'} ? :
264 0 0 exists $params{'login'} ? :
282 0 0 if ($self->{'connect'}) { }
283 0 0 $self->_connect($self->{'login'}) ? :
295 0 0 if (not $@)
298 0 0 if (-e $rcfile)
302 0 0 if (not defined $params_ref->{'host'} and $config->param("default.default"))
307 0 0 if (not defined $params_ref->{'debug'} and $config->param("default.debug"))
316 0 0 unless defined $params_ref->{$key}
327 0 0 if defined $self->{'ssl'} and defined $self->{'ciphers'}
329 0 0 if (defined $self->{'key'} and defined $self->{'cert'} and defined $self->{'ssl'})
336 0 0 if (defined $self->{'ssl'} and defined $self->{'verify'}) { }
0 0 elsif (defined $self->{'ssl'}) { }
352 0 0 if ($@ ne '') { }
365 0 0 if (ref $self->{'greeting'} ne 'Net::EPP::Frame::Response') { }
378 0 0 if ($login) { }
394 0 0 if (not $response) { }
404 0 0 if ($Code > 1999) { }
434 0 0 if ($self->{'stdext'}) { }
0 0 elsif ($self->{'extensions'}) { }
447 0 0 if ($self->{'login_security'} or &any(sub { 'urn:ietf:params:xml:ns:epp:loginSec-1.0' eq $_; } , @extensions)) { }
448 0 0 unless &any(sub { "urn:ietf:params:xml:ns:epp:loginSec-1.0" eq $_; } , @extensions)
473 0 0 if ($self->{'newPW'})
491 0 0 if ($self->{'newPW'})
503 0 0 if $self->{'stdobj'}
504 0 0 unless $objects
507 0 0 if (scalar @extensions > 0)
562 0 0 if ($type eq 'domain') { }
0 0 elsif ($type eq 'contact') { }
0 0 elsif ($type eq 'host') { }
581 0 0 if (not $response) { }
588 0 0 if ($Code > 1999) { }
595 0 0 if ($type eq 'domain' or $type eq 'host') { }
0 0 elsif ($type eq 'contact') { }
639 0 0 if ref $result ne "HASH" or not $follow
641 0 0 if (defined $result->{'ns'} and ref $result->{'ns'} eq "ARRAY")
644 0 0 if ref $info eq "HASH"
648 0 0 if (defined $result->{'hosts'} and ref $result->{'hosts'} eq "ARRAY")
651 0 0 if ref $info eq "HASH"
656 0 0 if ref $info eq "HASH"
660 0 0 if ref $info eq "HASH"
713 0 0 if ($type eq 'domain') { }
0 0 elsif ($type eq 'contact') { }
0 0 elsif ($type eq 'host') { }
731 0 0 if (defined $authInfo and $authInfo ne "")
736 0 0 if $type eq "contact" and $opt
743 0 0 if (not $response) { }
750 0 0 if ($Code > 1999) { }
766 0 0 if ($type eq 'domain') { }
0 0 elsif ($type eq 'contact') { }
0 0 elsif ($type eq 'host') { }
792 0 0 if $els->size > 0
876 0 0 if (ref $hash->{'contacts'}{$type} eq 'STRING') { }
0 0 elsif (ref $hash->{'contacts'}{$type} eq 'ARRAY') { }
890 0 0 if ($ns->size == 1)
915 0 0 if ($auths->size == 1)
918 0 0 if $pw->size == 1
921 0 0 if (defined $secinfo)
922 0 0 if (my $maxSigLife = $secinfo->getElementsByLocalName("maxSigLife"))
1036 0 0 if ($els->size > 0)
1044 0 0 if (defined $els and $els->size == 1)
1046 0 0 if (defined $el)
1048 0 0 if defined $el->getAttribute("x") and $el->getAttribute("x") ne ""
1059 0 0 if $els->size == 1
1063 0 0 if ($addrs->size == 1)
1066 0 0 if 1 != $child->nodeType
1067 0 0 if ($child->localName eq 'street') { }
1081 0 0 if ($auths->size == 1)
1084 0 0 if $pw->size == 1
1137 0 0 if ($@ or ref $frame ne $class) { }
1144 0 0 if ($type eq 'domain') { }
0 0 elsif ($type eq 'contact') { }
1146 0 0 if $op eq "request"
1153 0 0 if ($op eq "request" or $op eq "query")
1154 0 0 if $authInfo ne ""
1162 0 0 if (not $response) { }
1169 0 0 if ($Code > 1999) { }
0 0 elsif ($op eq 'query' or $op eq 'request') { }
1301 0 0 if defined $domain->{'period'} and $domain->{'period'} > 0
1302 0 0 if $domain->{'ns'} and @{$domain->{'ns'};}
1303 0 0 if defined $domain->{'registrant'} and $domain->{'registrant'} ne ""
1305 0 0 if defined $domain->{'authInfo'} and $domain->{'authInfo'} ne ""
1359 0 0 if (ref $contact->{'postalInfo'} eq "HASH")
1370 0 0 if defined $contact->{'voice'} and $contact->{'voice'} ne ""
1371 0 0 if defined $contact->{'fax'} and $contact->{'fax'} ne ""
1373 0 0 if defined $contact->{'authInfo'} and $contact->{'authInfo'} ne ""
1375 0 0 if (ref $contact->{'status'} eq "ARRAY")
1388 0 0 unless $response
1393 0 0 if ($Code > 1999)
1576 0 0 unless (exists $frame_generator{$type})
1594 0 0 if (exists $info->{'add'} and ref $info->{'add'} eq "HASH")
1599 0 0 if (exists $add->{'ns'} and ref $add->{'ns'} eq "ARRAY")
1604 0 0 if (exists $add->{'contacts'} and ref $add->{'contacts'} eq "HASH")
1613 0 0 if (exists $add->{'status'} and ref $add->{'status'})
1614 0 0 if (ref $add->{'status'} eq 'HASH') { }
0 0 elsif (ref $add->{'status'} eq 'ARRAY') { }
1626 0 0 if (exists $info->{'rem'} and ref $info->{'rem'} eq "HASH")
1631 0 0 if (exists $rem->{'ns'} and ref $rem->{'ns'} eq "ARRAY")
1636 0 0 if (exists $rem->{'contacts'} and ref $rem->{'contacts'} eq "HASH")
1645 0 0 if (exists $rem->{'status'} and ref $rem->{'status'} eq "ARRAY")
1651 0 0 if (exists $info->{'chg'} and ref $info->{'chg'} eq "HASH")
1655 0 0 if (defined $chg->{'registrant'})
1659 0 0 if (defined $chg->{'authInfo'})
1675 0 0 if (exists $info->{'add'} and ref $info->{'add'} eq "HASH")
1678 0 0 if (exists $add->{'status'} and ref $add->{'status'})
1679 0 0 if (ref $add->{'status'} eq 'HASH') { }
0 0 elsif (ref $add->{'status'} eq 'ARRAY') { }
1691 0 0 if (exists $info->{'rem'} and ref $info->{'rem'} eq "HASH")
1695 0 0 if (exists $rem->{'status'} and ref $rem->{'status'} eq "ARRAY")
1701 0 0 if (exists $info->{'chg'} and ref $info->{'chg'} eq "HASH")
1706 0 0 if (ref $chg->{'postalInfo'} eq "HASH")
1719 0 0 if (defined $chg->{$contact_type})
1727 0 0 if ($chg->{'authInfo'})
1743 0 0 if (exists $info->{'add'} and ref $info->{'add'} eq "HASH")
1746 0 0 if (exists $add->{'addrs'} and ref $add->{'addrs'} eq "ARRAY")
1750 0 0 if (exists $add->{'status'} and ref $add->{'status'})
1751 0 0 if (ref $add->{'status'} eq 'HASH') { }
0 0 elsif (ref $add->{'status'} eq 'ARRAY') { }
1762 0 0 if (exists $info->{'rem'} and ref $info->{'rem'} eq "HASH")
1765 0 0 if (exists $rem->{'addrs'} and ref $rem->{'addrs'} eq "ARRAY")
1769 0 0 if (exists $rem->{'status'} and ref $rem->{'status'})
1770 0 0 if (ref $rem->{'status'} eq 'HASH') { }
0 0 elsif (ref $rem->{'status'} eq 'ARRAY') { }
1781 0 0 if (exists $info->{'chg'} and ref $info->{'chg'} eq "HASH")
1782 0 0 if ($info->{'chg'}{'name'})
1833 0 0 if ($type eq 'domain') { }
0 0 elsif ($type eq 'contact') { }
0 0 elsif ($type eq 'host') { }
1854 0 0 if (not $response) { }
1861 0 0 if ($Code > 1999) { }
1905 0 0 if $info->{'period'}
1946 0 0 if (UNIVERSAL::isa($response, 'XML::LibXML::Document')) { }
1961 0 0 if ($self->{'reconnect'} > 0) { }
1963 0 0 if (not $self->ping) { }
1967 0 0 if ($self->_connect) { }
2014 0 0 if (not $self->connected) { }
0 0 elsif (not $frame) { }
2027 0 0 if UNIVERSAL::isa($frame, "Net::EPP::Frame::Command")
2030 0 0 if ($frame =~ m[^/]) { }
2038 0 0 if (UNIVERSAL::isa($frame, 'XML::LibXML::Document')) { }
2048 0 0 if UNIVERSAL::isa($response, "XML::LibXML::Document")
2065 0 0 if (not $self->connected) { }
2082 0 0 if ($@ ne '') { }
2088 0 0 if ($@ =~ /^timeout/) { }
2106 0 0 if (not $self->connected) { }
2126 0 0 if ($message)
2131 0 0 if ($reason)
2140 0 0 if ($doc->isa("XML::DOM::Document") or $doc->isa("Net::EPP::Frame::Response"))
2142 0 0 if (defined $els)
2144 0 0 if defined $el
2152 0 0 if ($doc->isa("XML::DOM::Document") or $doc->isa("Net::EPP::Frame::Response"))
2154 0 0 if (defined $msgs)
2156 0 0 if defined $msg
2164 0 0 if ($doc->isa("XML::DOM::Document") or $doc->isa("Net::EPP::Frame::Response"))
2166 0 0 if (defined $reasons)
2168 0 0 if (defined $reason)
2178 0 0 if ($self->authenticated)
2182 0 0 if (not $response) { }
2202 0 0 if $self->connected
2209 0 0 if defined $self->{'debug'} and $self->{'debug'} == 1