| line |
true |
false |
branch |
|
92
|
0 |
0 |
unless ($change) |
|
94
|
0 |
0 |
unless scalar $self->name and scalar $self->city and scalar $self->cc and $self->srid |
|
97
|
0 |
0 |
unless Net::DRI::Util::xml_is_token($self->srid, 3, 32) |
|
104
|
0 |
0 |
if $self->roid and not $self->roid =~ /^\w{1,80}-\w{1,8}$/ |
|
108
|
0 |
0 |
if $self->name and grep {not Net::DRI::Util::xml_is_normalizedstring($_, 1, 255);} $self->name |
|
111
|
0 |
0 |
if $self->org and grep {not Net::DRI::Util::xml_is_normalizedstring($_, undef, 255);} $self->org |
|
117
|
0 |
0 |
unless $rs[$i] |
|
121
|
0 |
0 |
if ref $rs[$i] ne 'ARRAY' or @{$rs[$i];} > 3 or grep {not Net::DRI::Util::xml_is_normalizedstring($_, undef, 255);} @{$rs[$i];} |
|
125
|
0 |
0 |
if $self->city and grep {not Net::DRI::Util::xml_is_normalizedstring($_, 1, 255);} $self->city |
|
128
|
0 |
0 |
if $self->pc and grep {not Net::DRI::Util::xml_is_normalizedstring($_, undef, 16);} $self->pc |
|
131
|
0 |
0 |
if $self->cc and grep {not Net::DRI::Util::xml_is_normalizedstring($_, 2, 2);} $self->cc |
|
134
|
0 |
0 |
if $self->cc and grep {not exists $Net::DRI::Util::CCA2{uc $_};} $self->cc |
|
136
|
0 |
0 |
if $self->voice and not Net::DRI::Util::xml_is_token($self->voice, undef, 17) and not $self->voice =~ /^\+[0-9]{1,3}\.[0-9]{1,14}(?:x\d+)?$/ |
|
139
|
0 |
0 |
if $self->fax and not Net::DRI::Util::xml_is_token($self->fax, undef, 17) and not $self->fax =~ /^\+[0-9]{1,3}\.[0-9]{1,14}(?:x\d+)?$/ |
|
142
|
0 |
0 |
if $self->email and not Net::DRI::Util::xml_is_token($self->email, 1, undef) and not 'Email::Valid'->rfc822($self->email) |
|
146
|
0 |
0 |
if @errs |