Branch Coverage

blib/lib/Net/DRI/Data/Contact/EURid.pm
Criterion Covered Total %
branch 0 28 0.0


line true false branch
91 0 0 unless ($change)
93 0 0 unless $self->voice and $self->type and $self->lang
97 0 0 if $self->name and grep {length $_ > 50;} $self->name
98 0 0 if $self->org and grep {length $_ > 100;} $self->org
101 0 0 if $self->type and not $self->type =~ /^(?:billing|tech|registrant|onsite)$/
102 0 0 if $self->vat and not Net::DRI::Util::xml_is_token($self->vat, 1, 20)
103 0 0 if $self->lang and not exists $Net::DRI::DRD::EURid::LANGA2_EU{lc $self->lang}
105 0 0 if @errs
108 0 0 if $self->type and $self->type =~ /^(?:type|billing)$/ and not $self->org
110 0 0 if defined $self->type and $self->type eq 'billing' and not $self->fax
113 0 0 if $self->type and $self->type eq 'registrant' and not exists $Net::DRI::DRD::EURid::CCA2_EU{uc $self->cc}
121 0 0 if ($what eq 'create')
124 0 0 unless $a and ref $a eq 'HASH' and exists $$a{'pw'}
125 0 0 unless defined $self->srid