Branch Coverage

blib/lib/Net/DRI/Protocol/OpenSRS/XCP/Domain.pm
Criterion Covered Total %
branch 0 180 0.0


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