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 |