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'}) |