line |
true |
false |
branch |
91
|
0 |
0 |
if defined $regip |
100
|
0 |
0 |
unless Net::DRI::Util::has_key($rd, 'cookie') |
102
|
0 |
0 |
exists $rd->{'type'} ? : |
111
|
0 |
0 |
unless $mes->is_success |
120
|
0 |
0 |
unless exists $ra->{$k} |
126
|
0 |
0 |
if (defined $ns and ref $ns and @$ns) |
138
|
0 |
0 |
unless exists $ra->{$bool} |
143
|
0 |
0 |
if (defined $c and ref $c and keys %$c) |
149
|
0 |
0 |
$type eq 'owner' ? : |
157
|
0 |
0 |
unless exists $ra->{$opensrs_status} |
170
|
0 |
0 |
if exists $rh->{'org_name'} |
171
|
0 |
0 |
if exists $$rh{'address' . $_} |
172
|
0 |
0 |
if exists $rh->{'city'} |
173
|
0 |
0 |
if exists $rh->{'state'} |
174
|
0 |
0 |
if exists $rh->{'postal_code'} |
175
|
0 |
0 |
if exists $rh->{'country'} |
176
|
0 |
0 |
if exists $rh->{'voice'} |
177
|
0 |
0 |
if exists $rh->{'fax'} |
178
|
0 |
0 |
if exists $rh->{'email'} |
179
|
0 |
0 |
if exists $rh->{'url'} |
188
|
0 |
0 |
if exists $rd->{'registrant_ip'} |
198
|
0 |
0 |
unless $mes->is_success |
202
|
0 |
0 |
exists $ra->{'status'} && defined $ra->{'status'} && $ra->{'status'} eq 'available' && $mes->response_code == 210 ? : |
219
|
0 |
0 |
unless $mes->is_success |
224
|
0 |
0 |
if exists $ra->{$_} |
236
|
0 |
0 |
if exists $rd->{'registrant_ip'} |
240
|
0 |
0 |
if grep {not Net::DRI::Util::has_key($rd, $_);} 'username', 'password' |
242
|
0 |
0 |
unless Net::DRI::Util::has_contact($rd) |
247
|
0 |
0 |
unless @t == 1 |
249
|
0 |
0 |
unless Net::DRI::Util::isa_contact($co) |
258
|
0 |
0 |
if ($cs->get('tech')) { } |
267
|
0 |
0 |
$rd->{$_} ? : |
|
0 |
0 |
if Net::DRI::Util::has_key($rd, $_) |
270
|
0 |
0 |
if Net::DRI::Util::has_key($rd, $_) |
273
|
0 |
0 |
if (Net::DRI::Util::has_key($rd, 'f_bypass_confirm') and Net::DRI::Util::has_auth($rd)) |
281
|
0 |
0 |
if ($reg_type eq 'new') |
282
|
0 |
0 |
unless Net::DRI::Util::has_duration($rd) |
303
|
0 |
0 |
unless Net::DRI::Util::isa_changes($todo) |
304
|
0 |
0 |
unless Net::DRI::Util::has_key($rd, 'cookie') |
309
|
0 |
0 |
if (defined $nsset) { } |
311
|
0 |
0 |
unless Net::DRI::Util::isa_hosts($nsset) |
312
|
0 |
0 |
if defined $contactset |
313
|
0 |
0 |
unless $nsset->count >= 2 |
321
|
0 |
0 |
unless defined $contactset and Net::DRI::Util::isa_contactset($contactset) |
329
|
0 |
0 |
unless @t == 1 |
331
|
0 |
0 |
unless Net::DRI::Util::isa_contact($co) |
333
|
0 |
0 |
$t eq 'registrant' ? : |
351
|
0 |
0 |
if $co->org |
354
|
0 |
0 |
unless $s and ref $s eq 'ARRAY' and @$s and $s->[0] |
357
|
0 |
0 |
if $s->[1] |
358
|
0 |
0 |
if $s->[2] |
359
|
0 |
0 |
unless $co->city and $co->cc |
362
|
0 |
0 |
if $co->sp |
363
|
0 |
0 |
if $co->pc |
365
|
0 |
0 |
unless $co->voice and $co->email |
367
|
0 |
0 |
if $co->fax |
369
|
0 |
0 |
if $co->url |
377
|
0 |
0 |
if Net::DRI::Util::isa_contact($co) |
385
|
0 |
0 |
if Net::DRI::Util::isa_contact($co) |
393
|
0 |
0 |
if Net::DRI::Util::isa_contact($co) |
401
|
0 |
0 |
if Net::DRI::Util::isa_contact($co) |
413
|
0 |
0 |
if (defined $ns) |
414
|
0 |
0 |
unless Net::DRI::Util::isa_hosts($ns) and $ns->count >= 2 |
432
|
0 |
0 |
unless Net::DRI::Util::has_key($rd, 'reseller_id') |
435
|
0 |
0 |
if exists $rd->{'registrant_ip'} |
439
|
0 |
0 |
if Net::DRI::Util::has_key($rd, 'notes') |
448
|
0 |
0 |
unless $mes->is_success |
453
|
0 |
0 |
if exists $ra->{$_} |
464
|
0 |
0 |
if exists $rd->{'registrant_ip'} |
466
|
0 |
0 |
unless Net::DRI::Util::has_key($rd, 'auto_renew') |
468
|
0 |
0 |
unless Net::DRI::Util::has_duration($rd) |
469
|
0 |
0 |
unless Net::DRI::Util::has_key($rd, 'current_expiration') and Net::DRI::Util::check_isa($rd->{'current_expiration'}, 'DateTime') |
475
|
0 |
0 |
$rd->{$_} ? : |
|
0 |
0 |
if Net::DRI::Util::has_key($rd, $_) |
478
|
0 |
0 |
if Net::DRI::Util::has_key($rd, $_) |
494
|
0 |
0 |
unless $mes->is_success |
499
|
0 |
0 |
if exists $ra->{$_} |
503
|
0 |
0 |
if defined $ra->{$k} |
519
|
0 |
0 |
unless $mes->is_success |
524
|
0 |
0 |
if exists $ra->{$_} |
535
|
0 |
0 |
if exists $rd->{'registrant_ip'} |
546
|
0 |
0 |
unless $mes->is_success |
551
|
0 |
0 |
if exists $ra->{$_} |
561
|
0 |
0 |
unless Net::DRI::Util::has_key($rd, 'reseller_id') |
564
|
0 |
0 |
if exists $rd->{'registrant_ip'} |
575
|
0 |
0 |
unless $mes->is_success |
598
|
0 |
0 |
unless $mes->is_success |
604
|
0 |
0 |
unless exists $ra->{'belongs_to_rsp'} and defined $ra->{'belongs_to_rsp'} |
606
|
0 |
0 |
$ra->{'belongs_to_rsp'} ? : |
607
|
0 |
0 |
if (exists $ra->{'domain_expdate'} and defined $ra->{'domain_expdate'}) |