line |
true |
false |
branch |
68
|
0 |
0 |
if ($params->{'conn'}) { } |
74
|
0 |
0 |
unless ($code and $code == 1000) |
85
|
0 |
0 |
if ($self->can($action)) { } |
95
|
0 |
0 |
if $self->{'critical_error'} |
99
|
0 |
0 |
unless $answ and ref $answ |
104
|
0 |
0 |
wantarray ? : |
157
|
0 |
0 |
if ($k =~ /^x-/) |
163
|
0 |
0 |
if ($k =~ /^X-/) |
168
|
0 |
0 |
if ($extension) |
201
|
0 |
0 |
unless $params->{'dname'} |
216
|
0 |
0 |
if ($content and $content =~ //) |
220
|
0 |
0 |
if ($content =~ m[]*>(.+).+/result>]s) |
224
|
0 |
0 |
if ($code != 1000) |
227
|
0 |
0 |
if $reason |
235
|
0 |
0 |
if ($row =~ /key="([^"]+)" value="([^"]+)"/) |
240
|
0 |
0 |
wantarray ? : |
243
|
0 |
0 |
wantarray ? : |
250
|
0 |
0 |
if (defined $params->{'authinfo'}) |
336
|
0 |
0 |
if ($content and $content =~ //) |
340
|
0 |
0 |
if ($content =~ m[]*>(.+).+/result>]s) |
349
|
0 |
0 |
if ($row =~ /key="([^"]+)" value="([^"]+)"/) |
354
|
0 |
0 |
wantarray ? : |
357
|
0 |
0 |
wantarray ? : |
443
|
0 |
0 |
if ($answ =~ /result code=['"](\d+)['"]/) |
447
|
0 |
0 |
if ($answ =~ m[]*>(.+).+/result>]s) |
453
|
0 |
0 |
if ($rcode == 1000) |
457
|
0 |
0 |
if ($row =~ /key="([^"]+)"\s+value="([^"]+)"/) |
463
|
0 |
0 |
wantarray ? : |
466
|
0 |
0 |
wantarray ? : |
473
|
0 |
0 |
if ($params->{'dname'} =~ /\.jp$/) |
492
|
0 |
0 |
if ($k =~ /^x-/) |
497
|
0 |
0 |
if ($params->{'trade'}) |
501
|
0 |
0 |
if ($params->{'dname'} =~ /\.xxx$/) |
506
|
0 |
0 |
if (defined $params->{'confirm_old_registrant'}) |
511
|
0 |
0 |
if (defined $params->{'confirm_new_registrant'}) |
516
|
0 |
0 |
if ($extension) |
571
|
0 |
0 |
if ($content and $content =~ //) |
575
|
0 |
0 |
if ($content =~ m[]*>(.+).+/result>]s) |
584
|
0 |
0 |
if ($row =~ /key="([^"]+)" value="([^"]+)"/) |
589
|
0 |
0 |
wantarray ? : |
592
|
0 |
0 |
wantarray ? : |
626
|
0 |
0 |
if ($content and $content =~ //) |
630
|
0 |
0 |
if ($content =~ m[]*>(.+).+/result>]s) |
639
|
0 |
0 |
if ($row =~ /key="([^"]+)" value="([^"]+)"/) |
644
|
0 |
0 |
wantarray ? : |
647
|
0 |
0 |
wantarray ? : |
656
|
0 |
0 |
if ($ext =~ m[]+>(.+)]s) |
661
|
0 |
0 |
if (/key="([^"]+)"\s+value="([^"]+)"/) |
667
|
0 |
0 |
if ($info{$k} =~ /^[A-Z0-9._-]+$/) |
672
|
0 |
0 |
if ($info{$k} =~ /\%/) |