Branch Coverage

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


line true false branch
93 0 0 unless $mes->is_success
96 0 0 unless $infdata
101 0 0 unless $name =~ /^(reg-status|first-bill|recur-bill|auto-bill|next-bill|auto-period|next-period|notes|reseller|renew-not-required)$/
111 0 0 unless $mes->is_success
113 0 0 unless $infdata
118 0 0 if $name eq 'domainName'
127 0 0 unless $mes->is_success
128 0 0 unless my $infdata = $mes->get_response('std-handshake', 'hanData')
130 0 0 unless my $dl = $infdata->getChildrenByTagNameNS($ns, 'domainListData')->shift
135 0 0 if $name eq 'domainName'
148 0 0 if $rd->{$_} and not $rd->{$_} =~ /^(bc|th)$/
149 0 0 if $rd->{$_} and not $rd->{$_} =~ /^[+]?\d+$/ && $rd->{$_} < 183
150 0 0 if $rd->{$_} and not $rd->{$_} =~ /^[+]?\d+$/ && $rd->{$_} < 10
153 0 0 unless $rd->{$_}
154 0 0 if $rd->{$_} =~ /^(1|Y|YES|TRUE)$/i
155 0 0 if $rd->{$_} =~ /^(0|N|NO|FALSE)$/i
156 0 0 unless $rd->{$_} =~ /^(Y|N)$/
158 0 0 if @errs
162 0 0 if defined $rd->{$_}
171 0 0 unless @n
182 0 0 if defined $todo->set($_)
184 0 0 unless $rd
186 0 0 unless @n
197 0 0 unless $rd->{'regMonth'} or $rd->{'exMonth'}
200 0 0 if UNIVERSAL::isa($rd->{$_}, 'DateTime')
201 0 0 if $rd->{$_} and not $rd->{$_} =~ /^[0-9]{4}-[0-9]{2}$/
206 0 0 if $rd->{'regMonth'}
207 0 0 if $rd->{'exMonth'}
220 0 0 unless $domain
221 0 0 unless Net::DRI::Util::is_hostname($domain)
233 0 0 unless $domain
234 0 0 unless $rd->{'registrar_tag'}
235 0 0 if defined $rd->{'account_id'} and $domain ne 'alldomains.co.uk'
237 0 0 defined $rd->{'account_id'} ? :
247 0 0 unless $rd->{'case_id'}
250 0 0 if $rd->{'registrant'}
260 0 0 unless $rd->{'case_id'}
271 0 0 unless $domain
272 0 0 unless $rd->{'type'} and $rd->{'type'} eq 'investigation'