Branch Coverage

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


line true false branch
96 0 0 unless ($change)
98 0 0 unless $self->voice and $self->type
102 0 0 if $self->name and grep {length $_ > 50;} $self->name
103 0 0 if $self->org and grep {length $_ > 100;} $self->org
106 0 0 if $self->type and not $self->type =~ /^(?:billing|tech|registrant|onsite|accmgr)$/
107 0 0 if $self->vat and not Net::DRI::Util::xml_is_token($self->vat, 1, 20)
108 0 0 if $self->lang and not $self->lang =~ /^(?:fr|nl|en)$/
110 0 0 if @errs
112 0 0 if $self->type and $self->type =~ /^(?:type|billing|accmgr)$/ and not $self->org
120 0 0 if ($what eq 'create')
123 0 0 unless $a and ref $a eq 'HASH' and exists $$a{'pw'}
124 0 0 unless defined $self->srid
132 0 0 if (defined $what and $what)
134 0 0 if $what eq 'licensee'