Branch Coverage

blib/lib/Net/DRI/Protocol/EPP/Extensions/AFNIC/Contact.pm
Criterion Covered Total %
branch 0 130 0.0


line true false branch
93 0 0 if ($contact->legal_form) { }
98 0 0 unless $contact->legal_form
99 0 0 if $contact->legal_form eq 'other' and not $contact->legal_form_other
101 0 0 $contact->legal_form eq 'other' ? :
104 0 0 if ($contact->legal_id and $contact->legal_id_type)
106 0 0 if $contact->legal_id_type eq 'siren'
107 0 0 if $contact->legal_id_type eq 'duns'
108 0 0 if $contact->legal_id_type eq 'local'
110 0 0 if $contact->vat
111 0 0 if $contact->trademark
113 0 0 if (defined $jo and ref $jo eq 'HASH')
116 0 0 if exists $$jo{'waldec'}
117 0 0 if defined $contact->legal_id and defined $contact->legal_form_other and $contact->legal_form_other eq 'asso'
122 0 0 if @id
130 0 0 if (Net::DRI::Util::has_key($b, 'date') and Net::DRI::Util::has_key($b, 'place'))
132 0 0 ref $$b{'date'} ? :
133 0 0 if ($$b{'place'} =~ /^[A-Z]{2}$/i) { }
144 0 0 if (@d)
146 0 0 if defined $contact->disclose and $contact->disclose eq 'N'
163 0 0 unless $mes->is_success
166 0 0 unless defined $credata
170 0 0 unless defined $credata
176 0 0 if ($name eq 'nhStatus') { }
0 0 elsif ($name eq 'idStatus') { }
191 0 0 if (Net::DRI::Util::has_key($qual, 'identification') and Net::DRI::Util::has_key($$qual{'identification'}, 'status'))
202 0 0 if (Net::DRI::Util::has_key($qual, 'reachable') and Net::DRI::Util::has_key($$qual{'reachable'}, 'value') and Net::DRI::Util::has_key($$qual{'reachable'}, 'media'))
204 0 0 $$qual{'reachable'}{'value'} ? :
218 0 0 unless $dadd or $ddel or $qadd or $qdel
221 0 0 if $dadd
222 0 0 if $ddel
224 0 0 if ($qadd)
229 0 0 if ($qdel)
236 0 0 if @add
237 0 0 if @del
248 0 0 if $c->hasAttribute('when')
249 0 0 if $c->hasAttribute('source')
258 0 0 if $c->hasAttribute('when')
259 0 0 if $c->hasAttribute('media')
260 0 0 if $c->hasAttribute('source')
269 0 0 unless $mes->is_success
272 0 0 unless defined $infdata
276 0 0 unless defined $infdata
283 0 0 if ($name eq 'firstName') { }
0 0 elsif ($name eq 'list') { }
0 0 elsif ($name eq 'individualInfos') { }
0 0 elsif ($name eq 'legalEntityInfos') { }
0 0 elsif ($name eq 'obsoleted') { }
0 0 elsif ($name eq 'reachable') { }
288 0 0 $c->textContent eq 'restrictedPublication' ? :
299 0 0 if $c->hasAttribute('when')
306 0 0 if %q
319 0 0 if ($nn eq 'idStatus') { }
0 0 elsif ($nn eq 'birthDate') { }
0 0 elsif ($nn eq 'birthCity') { }
0 0 elsif ($nn eq 'birthPc') { }
0 0 elsif ($nn eq 'birthCc') { }
334 0 0 unless $v eq 'FR'
349 0 0 if ($nn eq 'idStatus') { }
0 0 elsif ($nn eq 'legalStatus') { }
0 0 elsif ($nn =~ /^(?:siren|DUNS|local)$/) { }
0 0 elsif ($nn eq 'trademark') { }
0 0 elsif ($nn eq 'asso') { }
356 0 0 if $v
368 0 0 if $ccc->size
370 0 0 if ($ccc->size)