| line |
!l |
l&&!r |
l&&r |
condition |
|
93
|
0 |
0 |
0 |
$self->voice and $self->type |
|
|
0 |
0 |
0 |
$self->voice and $self->type and $self->lang |
|
97
|
0 |
0 |
0 |
$self->name and grep {length $_ > 50;} $self->name |
|
98
|
0 |
0 |
0 |
$self->org and grep {length $_ > 100;} $self->org |
|
101
|
0 |
0 |
0 |
$self->type and not $self->type =~ /^(?:billing|tech|registrant|onsite)$/ |
|
102
|
0 |
0 |
0 |
$self->vat and not Net::DRI::Util::xml_is_token($self->vat, 1, 20) |
|
103
|
0 |
0 |
0 |
$self->lang and not exists $Net::DRI::DRD::EURid::LANGA2_EU{lc $self->lang} |
|
108
|
0 |
0 |
0 |
$self->type and $self->type =~ /^(?:type|billing)$/ |
|
|
0 |
0 |
0 |
$self->type and $self->type =~ /^(?:type|billing)$/ and not $self->org |
|
110
|
0 |
0 |
0 |
defined $self->type and $self->type eq 'billing' |
|
|
0 |
0 |
0 |
defined $self->type and $self->type eq 'billing' and not $self->fax |
|
113
|
0 |
0 |
0 |
$self->type and $self->type eq 'registrant' |
|
|
0 |
0 |
0 |
$self->type and $self->type eq 'registrant' and not exists $Net::DRI::DRD::EURid::CCA2_EU{uc $self->cc} |
|
124
|
0 |
0 |
0 |
$a and ref $a eq 'HASH' |
|
|
0 |
0 |
0 |
$a and ref $a eq 'HASH' and exists $$a{'pw'} |