Branch Coverage

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


line true false branch
99 0 0 unless defined $reference and $reference
100 0 0 unless Net::DRI::Util::xml_is_normalizedstring($reference, 1, 100)
111 0 0 unless $mes->is_success
114 0 0 unless $infdata
121 0 0 unless $c->nodeType == 1
123 0 0 unless $name
125 0 0 if ($name =~ /^domain:(name|reference|code)$/) { }
0 0 elsif ($name eq 'domain:status') { }
0 0 elsif ($name =~ /^domain:(crDate|docsReceivedDate)$/) { }
0 0 elsif ($name eq 'domain:registrant') { }
0 0 elsif ($name eq 'domain:contact') { }
0 0 elsif ($name eq 'domain:ns') { }
0 0 elsif ($name eq 'domain:adr') { }
161 0 0 unless defined $rd and ref $rd eq 'HASH'
163 0 0 if @need
165 0 0 unless Net::DRI::Util::xml_is_normalizedstring($rd->{'reference'}, 1, 100)
168 0 0 unless $rd->{'right'} =~ /^(?:PUBLICBODY|REG-TM-NAT|REG-TM-COM-INTL|GEO-DOO|COMP-ID|UNREG-TM|TITLES-ART|OTHER)/
171 0 0 unless Net::DRI::Util::xml_is_token($rd->{'prior-right-on-name'}, 1, 255)
174 0 0 unless length $rd->{'prior-right-country'} == 2 and exists $Net::DRI::DRD::EURid::CCA2_EU{uc $rd->{'prior-right-country'}}
177 0 0 unless $rd->{'documentaryevidence'} =~ /^(?:applicant|registrar|thirdparty)$/
178 0 0 if ($rd->{'documentaryevidence'} eq 'thirdparty') { }
180 0 0 unless defined $rd->{'documentaryevidence_email'} and 'Email::Valid'->rfc822($rd->{'documentaryevidence_email'})
187 0 0 unless length $rd->{'evidence-lang'} == 2 and exists $Net::DRI::DRD::EURid::LANGA2_EU{lc $rd->{'evidence-lang'}}
192 0 0 if Net::DRI::Util::has_ns($rd)
195 0 0 if (Net::DRI::Util::has_contact($rd))
199 0 0 if @o
206 0 0 if (exists $rd->{'nsgroup'})
220 0 0 unless $mes->is_success
223 0 0 unless $credata
230 0 0 unless $c->nodeType == 1
232 0 0 unless $name
234 0 0 if ($name =~ /^domain:(name|reference|code)$/) { }
0 0 elsif ($name =~ /^domain:(crDate)$/) { }