| line |
true |
false |
branch |
|
239
|
0 |
0 |
defined $params{'load_config'} ? : |
|
240
|
0 |
0 |
if $load_config |
|
242
|
0 |
0 |
defined $params{'port'} && int $params{'port'} > 0 ? : |
|
243
|
0 |
0 |
$params{'no_ssl'} ? : |
|
250
|
0 |
0 |
defined $params{'debug'} ? : |
|
251
|
0 |
0 |
defined $params{'timeout'} && int $params{'timeout'} > 0 ? : |
|
252
|
0 |
0 |
defined $params{'reconnect'} ? : |
|
255
|
0 |
0 |
exists $params{'connect'} ? : |
|
256
|
0 |
0 |
exists $params{'login'} ? : |
|
274
|
0 |
0 |
if ($self->{'connect'}) { } |
|
275
|
0 |
0 |
$self->_connect($self->{'login'}) ? : |
|
287
|
0 |
0 |
if (not $@) |
|
290
|
0 |
0 |
if (-e $rcfile) |
|
294
|
0 |
0 |
if (not defined $params_ref->{'host'} and $config->param("default.default")) |
|
299
|
0 |
0 |
if (not defined $params_ref->{'debug'} and $config->param("default.debug")) |
|
308
|
0 |
0 |
unless defined $params_ref->{$key} |
|
319
|
0 |
0 |
if defined $self->{'ssl'} and defined $self->{'ciphers'} |
|
321
|
0 |
0 |
if (defined $self->{'key'} and defined $self->{'cert'} and defined $self->{'ssl'}) |
|
328
|
0 |
0 |
if (defined $self->{'ssl'} and defined $self->{'verify'}) { } |
|
|
0 |
0 |
elsif (defined $self->{'ssl'}) { } |
|
344
|
0 |
0 |
if ($@ ne '') { } |
|
357
|
0 |
0 |
if (ref $self->{'greeting'} ne 'Net::EPP::Frame::Response') { } |
|
370
|
0 |
0 |
if ($login) { } |
|
386
|
0 |
0 |
if (not $response) { } |
|
396
|
0 |
0 |
if ($Code > 1999) { } |
|
426
|
0 |
0 |
if ($self->{'stdext'}) { } |
|
|
0 |
0 |
elsif ($self->{'extensions'}) { } |
|
439
|
0 |
0 |
if ($self->{'login_security'} or &any(sub {
'urn:ietf:params:xml:ns:epp:loginSec-1.0' eq $_;
}
, @extensions)) { } |
|
440
|
0 |
0 |
unless &any(sub {
"urn:ietf:params:xml:ns:epp:loginSec-1.0" eq $_;
}
, @extensions) |
|
465
|
0 |
0 |
if ($self->{'newPW'}) |
|
483
|
0 |
0 |
if ($self->{'newPW'}) |
|
495
|
0 |
0 |
if $self->{'stdobj'} |
|
496
|
0 |
0 |
unless $objects |
|
499
|
0 |
0 |
if (scalar @extensions > 0) |
|
554
|
0 |
0 |
if ($type eq 'domain') { } |
|
|
0 |
0 |
elsif ($type eq 'contact') { } |
|
|
0 |
0 |
elsif ($type eq 'host') { } |
|
573
|
0 |
0 |
if (not $response) { } |
|
580
|
0 |
0 |
if ($Code > 1999) { } |
|
587
|
0 |
0 |
if ($type eq 'domain' or $type eq 'host') { } |
|
|
0 |
0 |
elsif ($type eq 'contact') { } |
|
631
|
0 |
0 |
if ref $result ne "HASH" or not $follow |
|
633
|
0 |
0 |
if (defined $result->{'ns'} and ref $result->{'ns'} eq "ARRAY") |
|
636
|
0 |
0 |
if ref $info eq "HASH" |
|
640
|
0 |
0 |
if (defined $result->{'hosts'} and ref $result->{'hosts'} eq "ARRAY") |
|
643
|
0 |
0 |
if ref $info eq "HASH" |
|
648
|
0 |
0 |
if ref $info eq "HASH" |
|
652
|
0 |
0 |
if ref $info eq "HASH" |
|
705
|
0 |
0 |
if ($type eq 'domain') { } |
|
|
0 |
0 |
elsif ($type eq 'contact') { } |
|
|
0 |
0 |
elsif ($type eq 'host') { } |
|
723
|
0 |
0 |
if (defined $authInfo and $authInfo ne "") |
|
728
|
0 |
0 |
if $type eq "contact" and $opt |
|
735
|
0 |
0 |
if (not $response) { } |
|
742
|
0 |
0 |
if ($Code > 1999) { } |
|
758
|
0 |
0 |
if ($type eq 'domain') { } |
|
|
0 |
0 |
elsif ($type eq 'contact') { } |
|
|
0 |
0 |
elsif ($type eq 'host') { } |
|
784
|
0 |
0 |
if $els->size > 0 |
|
868
|
0 |
0 |
if (ref $hash->{'contacts'}{$type} eq 'STRING') { } |
|
|
0 |
0 |
elsif (ref $hash->{'contacts'}{$type} eq 'ARRAY') { } |
|
882
|
0 |
0 |
if ($ns->size == 1) |
|
907
|
0 |
0 |
if ($auths->size == 1) |
|
910
|
0 |
0 |
if $pw->size == 1 |
|
913
|
0 |
0 |
if (defined $secinfo) |
|
914
|
0 |
0 |
if (my $maxSigLife = $secinfo->getElementsByLocalName("maxSigLife")) |
|
1028
|
0 |
0 |
if ($els->size > 0) |
|
1036
|
0 |
0 |
if (defined $els and $els->size == 1) |
|
1038
|
0 |
0 |
if (defined $el) |
|
1040
|
0 |
0 |
if defined $el->getAttribute("x") and $el->getAttribute("x") ne "" |
|
1051
|
0 |
0 |
if $els->size == 1 |
|
1055
|
0 |
0 |
if ($addrs->size == 1) |
|
1058
|
0 |
0 |
if 1 != $child->nodeType |
|
1059
|
0 |
0 |
if ($child->localName eq 'street') { } |
|
1073
|
0 |
0 |
if ($auths->size == 1) |
|
1076
|
0 |
0 |
if $pw->size == 1 |
|
1129
|
0 |
0 |
if ($@ or ref $frame ne $class) { } |
|
1136
|
0 |
0 |
if ($type eq 'domain') { } |
|
|
0 |
0 |
elsif ($type eq 'contact') { } |
|
1138
|
0 |
0 |
if $op eq "request" |
|
1145
|
0 |
0 |
if ($op eq "request" or $op eq "query") |
|
1146
|
0 |
0 |
if $authInfo ne "" |
|
1154
|
0 |
0 |
if (not $response) { } |
|
1161
|
0 |
0 |
if ($Code > 1999) { } |
|
|
0 |
0 |
elsif ($op eq 'query' or $op eq 'request') { } |
|
1293
|
0 |
0 |
if defined $domain->{'period'} and $domain->{'period'} > 0 |
|
1294
|
0 |
0 |
if $domain->{'ns'} and @{$domain->{'ns'};} |
|
1295
|
0 |
0 |
if defined $domain->{'registrant'} and $domain->{'registrant'} ne "" |
|
1297
|
0 |
0 |
if defined $domain->{'authInfo'} and $domain->{'authInfo'} ne "" |
|
1351
|
0 |
0 |
if (ref $contact->{'postalInfo'} eq "HASH") |
|
1362
|
0 |
0 |
if defined $contact->{'voice'} and $contact->{'voice'} ne "" |
|
1363
|
0 |
0 |
if defined $contact->{'fax'} and $contact->{'fax'} ne "" |
|
1365
|
0 |
0 |
if defined $contact->{'authInfo'} and $contact->{'authInfo'} ne "" |
|
1367
|
0 |
0 |
if (ref $contact->{'status'} eq "ARRAY") |
|
1380
|
0 |
0 |
unless $response |
|
1385
|
0 |
0 |
if ($Code > 1999) |
|
1568
|
0 |
0 |
unless (exists $frame_generator{$type}) |
|
1586
|
0 |
0 |
if (exists $info->{'add'} and ref $info->{'add'} eq "HASH") |
|
1591
|
0 |
0 |
if (exists $add->{'ns'} and ref $add->{'ns'} eq "ARRAY") |
|
1596
|
0 |
0 |
if (exists $add->{'contacts'} and ref $add->{'contacts'} eq "HASH") |
|
1605
|
0 |
0 |
if (exists $add->{'status'} and ref $add->{'status'}) |
|
1606
|
0 |
0 |
if (ref $add->{'status'} eq 'HASH') { } |
|
|
0 |
0 |
elsif (ref $add->{'status'} eq 'ARRAY') { } |
|
1618
|
0 |
0 |
if (exists $info->{'rem'} and ref $info->{'rem'} eq "HASH") |
|
1623
|
0 |
0 |
if (exists $rem->{'ns'} and ref $rem->{'ns'} eq "ARRAY") |
|
1628
|
0 |
0 |
if (exists $rem->{'contacts'} and ref $rem->{'contacts'} eq "HASH") |
|
1637
|
0 |
0 |
if (exists $rem->{'status'} and ref $rem->{'status'} eq "ARRAY") |
|
1643
|
0 |
0 |
if (exists $info->{'chg'} and ref $info->{'chg'} eq "HASH") |
|
1647
|
0 |
0 |
if (defined $chg->{'registrant'}) |
|
1651
|
0 |
0 |
if (defined $chg->{'authInfo'}) |
|
1667
|
0 |
0 |
if (exists $info->{'add'} and ref $info->{'add'} eq "HASH") |
|
1670
|
0 |
0 |
if (exists $add->{'status'} and ref $add->{'status'}) |
|
1671
|
0 |
0 |
if (ref $add->{'status'} eq 'HASH') { } |
|
|
0 |
0 |
elsif (ref $add->{'status'} eq 'ARRAY') { } |
|
1683
|
0 |
0 |
if (exists $info->{'rem'} and ref $info->{'rem'} eq "HASH") |
|
1687
|
0 |
0 |
if (exists $rem->{'status'} and ref $rem->{'status'} eq "ARRAY") |
|
1693
|
0 |
0 |
if (exists $info->{'chg'} and ref $info->{'chg'} eq "HASH") |
|
1698
|
0 |
0 |
if (ref $chg->{'postalInfo'} eq "HASH") |
|
1711
|
0 |
0 |
if (defined $chg->{$contact_type}) |
|
1719
|
0 |
0 |
if ($chg->{'authInfo'}) |
|
1735
|
0 |
0 |
if (exists $info->{'add'} and ref $info->{'add'} eq "HASH") |
|
1738
|
0 |
0 |
if (exists $add->{'addrs'} and ref $add->{'addrs'} eq "ARRAY") |
|
1742
|
0 |
0 |
if (exists $add->{'status'} and ref $add->{'status'}) |
|
1743
|
0 |
0 |
if (ref $add->{'status'} eq 'HASH') { } |
|
|
0 |
0 |
elsif (ref $add->{'status'} eq 'ARRAY') { } |
|
1754
|
0 |
0 |
if (exists $info->{'rem'} and ref $info->{'rem'} eq "HASH") |
|
1757
|
0 |
0 |
if (exists $rem->{'addrs'} and ref $rem->{'addrs'} eq "ARRAY") |
|
1761
|
0 |
0 |
if (exists $rem->{'status'} and ref $rem->{'status'}) |
|
1762
|
0 |
0 |
if (ref $rem->{'status'} eq 'HASH') { } |
|
|
0 |
0 |
elsif (ref $rem->{'status'} eq 'ARRAY') { } |
|
1773
|
0 |
0 |
if (exists $info->{'chg'} and ref $info->{'chg'} eq "HASH") |
|
1774
|
0 |
0 |
if ($info->{'chg'}{'name'}) |
|
1825
|
0 |
0 |
if ($type eq 'domain') { } |
|
|
0 |
0 |
elsif ($type eq 'contact') { } |
|
|
0 |
0 |
elsif ($type eq 'host') { } |
|
1846
|
0 |
0 |
if (not $response) { } |
|
1853
|
0 |
0 |
if ($Code > 1999) { } |
|
1897
|
0 |
0 |
if $info->{'period'} |
|
1938
|
0 |
0 |
if (UNIVERSAL::isa($response, 'XML::LibXML::Document')) { } |
|
1953
|
0 |
0 |
if ($self->{'reconnect'} > 0) { } |
|
1955
|
0 |
0 |
if (not $self->ping) { } |
|
1959
|
0 |
0 |
if ($self->_connect) { } |
|
2006
|
0 |
0 |
if (not $self->connected) { } |
|
|
0 |
0 |
elsif (not $frame) { } |
|
2019
|
0 |
0 |
if UNIVERSAL::isa($frame, "Net::EPP::Frame::Command") |
|
2022
|
0 |
0 |
if ($frame =~ m[^/]) { } |
|
2030
|
0 |
0 |
if (UNIVERSAL::isa($frame, 'XML::LibXML::Document')) { } |
|
2040
|
0 |
0 |
if UNIVERSAL::isa($response, "XML::LibXML::Document") |
|
2057
|
0 |
0 |
if (not $self->connected) { } |
|
2074
|
0 |
0 |
if ($@ ne '') { } |
|
2080
|
0 |
0 |
if ($@ =~ /^timeout/) { } |
|
2098
|
0 |
0 |
if (not $self->connected) { } |
|
2118
|
0 |
0 |
if ($message) |
|
2123
|
0 |
0 |
if ($reason) |
|
2132
|
0 |
0 |
if ($doc->isa("XML::DOM::Document") or $doc->isa("Net::EPP::Frame::Response")) |
|
2134
|
0 |
0 |
if (defined $els) |
|
2136
|
0 |
0 |
if defined $el |
|
2144
|
0 |
0 |
if ($doc->isa("XML::DOM::Document") or $doc->isa("Net::EPP::Frame::Response")) |
|
2146
|
0 |
0 |
if (defined $msgs) |
|
2148
|
0 |
0 |
if defined $msg |
|
2156
|
0 |
0 |
if ($doc->isa("XML::DOM::Document") or $doc->isa("Net::EPP::Frame::Response")) |
|
2158
|
0 |
0 |
if (defined $reasons) |
|
2160
|
0 |
0 |
if (defined $reason) |
|
2170
|
0 |
0 |
if ($self->authenticated) |
|
2174
|
0 |
0 |
if (not $response) { } |
|
2194
|
0 |
0 |
if $self->connected |
|
2201
|
0 |
0 |
if defined $self->{'debug'} and $self->{'debug'} == 1 |