Branch Coverage

blib/lib/Net/DRI/Protocol/EPP/Extensions/EURid/Domain.pm
Criterion Covered Total %
branch 0 114 0.0


line true false branch
114 0 0 if Net::DRI::Util::has_key($rd, 'nsgroup')
115 0 0 if Net::DRI::Util::has_key($rd, 'keygroup') and Net::DRI::Util::xml_is_token($rd->{'keygroup'}, 1, 100)
118 0 0 unless @n
130 0 0 if (grep {not /^(?:add|del)$/;} $todo->types('nsgroup'))
139 0 0 unless $nsgadd or $nsgdel or $cadd or $cdel
142 0 0 if ($nsgadd or $cadd)
145 0 0 if $nsgadd
146 0 0 if $cadd
147 0 0 if @todo
149 0 0 if ($nsgdel or $cdel)
152 0 0 if $nsgdel
153 0 0 if $cdel
154 0 0 if @todo
158 0 0 unless @n
170 0 0 unless Net::DRI::Util::has_key($rd, 'authinfo_request') and $rd->{'authinfo_request'}
182 0 0 unless $mes->is_success
185 0 0 unless defined $infdata
193 0 0 if ($name =~ /^(onHold|quarantined)$/) { }
0 0 elsif ($name =~ /^(availableDate|deletionDate)$/) { }
0 0 elsif ($name eq 'contact') { }
0 0 elsif ($name eq 'nsgroup') { }
0 0 elsif ($name eq 'keygroup') { }
0 0 elsif ($name eq 'pendingTransfer') { }
195 0 0 if Net::DRI::Util::xml_parse_boolean($c->textContent)
217 0 0 if ($subname eq 'registrant') { }
0 0 elsif ($subname eq 'contact') { }
0 0 elsif ($subname eq 'initiationDate') { }
220 0 0 unless exists $ccache{$id}
225 0 0 unless exists $ccache{$id}
236 0 0 if @nsg
244 0 0 unless $mes->is_success
247 0 0 unless defined $chkdata
256 0 0 if ($n eq 'name') { }
0 0 elsif ($n eq 'availableDate') { }
0 0 elsif ($n eq 'status') { }
277 0 0 Net::DRI::Util::has_key($rd, 'deleteDate') ? :
278 0 0 Net::DRI::Util::has_key($rd, 'cancel') && $rd->{'cancel'} ? :
280 0 0 unless $hasdelete or $hascancel
281 0 0 if $hasdelete and $hascancel
286 0 0 if ($hasdelete)
291 0 0 if ($hascancel)
308 0 0 if (Net::DRI::Util::has_contact($rd))
312 0 0 if Net::DRI::Util::isa_contact($creg, 'Net::DRI::Data::Contact::EURid')
314 0 0 if Net::DRI::Util::isa_contact($cbill, 'Net::DRI::Data::Contact::EURid')
315 0 0 if $cs->has_type('tech')
316 0 0 if $cs->has_type('onsite')
319 0 0 if Net::DRI::Util::has_ns($rd)
320 0 0 if Net::DRI::Util::has_key($rd, 'nsgroup')
326 0 0 if ($epp->has_module('Net::DRI::Protocol::EPP::Extensions::SecDNS'))
329 0 0 if defined $ref and ref $ref
337 0 0 unless defined $nsg and $nsg
338 0 0 if defined $_ and $_ and not ref $_
0 0 Net::DRI::Util::isa_nsgroup($_) ? :
0 0 ref $nsg eq 'ARRAY' ? :
353 0 0 unless $mes->is_success
356 0 0 unless defined $rendata
361 0 0 if ($name =~ /^(removedDeletionDate)$/)