Branch Coverage

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


line true false branch
95 0 0 unless Net::DRI::Util::has_key($rd, 'orgid')
96 0 0 unless Net::DRI::Util::xml_is_token($$rd{'orgid'}, 1, 30)
108 0 0 unless $mes->is_success
111 0 0 unless $chkdata
122 0 0 unless $c->nodeType == 1
124 0 0 if ($n eq 'name') { }
0 0 elsif ($n eq 'equivalentName') { }
0 0 elsif ($n eq 'organization') { }
0 0 elsif ($n eq 'ticketNumber') { }
127 0 0 if defined $hc
128 0 0 if defined $irp
150 0 0 unless Net::DRI::Util::has_key($rd, 'ticket')
151 0 0 unless Net::DRI::Util::isint($$rd{'ticket'})
163 0 0 unless $mes->is_success
166 0 0 unless $infdata
179 0 0 unless $c->nodeType == 1
181 0 0 if ($n eq 'ticketNumber') { }
0 0 elsif ($n eq 'organization') { }
0 0 elsif ($n eq 'releaseProcessFlags') { }
0 0 elsif ($n eq 'pending') { }
0 0 elsif ($n eq 'ticketNumberConc') { }
0 0 elsif ($n eq 'publicationStatus') { }
0 0 elsif ($n eq 'autoRenew') { }
192 0 0 unless $c->hasAttribute('flag' . $f)
203 0 0 unless $cc->nodeType == 1
205 0 0 if ($nn eq 'doc') { }
0 0 elsif ($nn eq 'dns') { }
0 0 elsif ($nn eq 'releaseProc') { }
259 0 0 defined $$rh{$_} && $$rh{$_} ? :
260 0 0 keys %f ? :
268 0 0 unless Net::DRI::Util::has_key($rd, 'orgid')
269 0 0 unless Net::DRI::Util::xml_is_token($$rd{'orgid'}, 1, 30)
272 0 0 if Net::DRI::Util::has_key($rd, 'release') and ref $$rd{'release'} eq 'HASH'
273 0 0 $$rd{'auto_renew'} ? :
0 0 if Net::DRI::Util::has_key($rd, 'auto_renew')
284 0 0 unless $mes->is_success
287 0 0 unless $credata
296 0 0 unless $mes->is_success
299 0 0 unless $rendata
302 0 0 unless $pub->size
317 0 0 unless defined $ticket or defined $release or defined $autorenew
320 0 0 if defined $ticket and Net::DRI::Util::isint($ticket)
322 0 0 if defined $release and ref $release eq 'HASH'
323 0 0 $autorenew ? :
0 0 if defined $autorenew
324 0 0 if @c
326 0 0 unless @n
336 0 0 unless $mes->is_success
339 0 0 unless $upddata
348 0 0 unless $mes->is_success
351 0 0 unless $pandata
356 0 0 unless $c->nodeType == 1
358 0 0 unless $n
359 0 0 if ($n eq 'ticketNumber') { }
0 0 elsif ($n eq 'reason') { }