Condition Coverage

blib/lib/Net/DRI/Data/Contact/AT.pm
Criterion Covered Total %
condition 0 84 0.0


and 2 conditions

line l !l condition
86 0 0 scalar(($self->name)[1]) and scalar(($self->city)[1])
0 0 scalar(($self->name)[1]) and scalar(($self->city)[1]) and scalar(($self->cc)[1])

and 3 conditions

line !l l&&!r l&&r condition
86 0 0 0 scalar(($self->name)[1]) and scalar(($self->city)[1]) and scalar(($self->cc)[1]) and $self->email
0 0 0 scalar(($self->name)[1]) and scalar(($self->city)[1]) and scalar(($self->cc)[1]) and $self->email and $self->auth
0 0 0 scalar(($self->name)[1]) and scalar(($self->city)[1]) and scalar(($self->cc)[1]) and $self->email and $self->auth and $self->srid
93 0 0 0 $self->srid and not $self->srid =~ /^\w{1,80}-\w{1,8}$/
0 0 0 $self->srid and not $self->srid =~ /^\w{1,80}-\w{1,8}$/ and not $self->srid =~ /^AUTO$/i
94 0 0 0 $self->name and not Net::DRI::Util::xml_is_normalizedstring(($self->name)[1], 1, 255)
95 0 0 0 $self->org and not Net::DRI::Util::xml_is_normalizedstring(($self->org)[1], undef, 255)
103 0 0 0 $self->city and not Net::DRI::Util::xml_is_normalizedstring(($self->city)[1], 1, 255)
104 0 0 0 $self->sp and not Net::DRI::Util::xml_is_normalizedstring(($self->sp)[1], undef, 255)
105 0 0 0 $self->pc and not Net::DRI::Util::xml_is_token(($self->pc)[1], 1, 16)
106 0 0 0 $self->cc and not Net::DRI::Util::xml_is_token(($self->cc)[1], 2, 2)
107 0 0 0 $self->cc and grep {not exists $Net::DRI::Util::CCA2{uc $_};} $self->cc
109 0 0 0 Net::DRI::Util::xml_is_token($self->voice, undef, 17) && $self->voice =~ /^\+[0-9]{1,3}\.[0-9]{1,14}(?:x\d+)?$/
0 0 0 $self->voice and not Net::DRI::Util::xml_is_token($self->voice, undef, 17) && $self->voice =~ /^\+[0-9]{1,3}\.[0-9]{1,14}(?:x\d+)?$/
110 0 0 0 Net::DRI::Util::xml_is_token($self->fax, undef, 17) && $self->fax =~ /^\+[0-9]{1,3}\.[0-9]{1,14}(?:x\d+)?$/
0 0 0 $self->fax and not Net::DRI::Util::xml_is_token($self->fax, undef, 17) && $self->fax =~ /^\+[0-9]{1,3}\.[0-9]{1,14}(?:x\d+)?$/
111 0 0 0 Net::DRI::Util::xml_is_token($self->email, 1, undef) && 'Email::Valid'->rfc822($self->email)
0 0 0 $self->email and not Net::DRI::Util::xml_is_token($self->email, 1, undef) && 'Email::Valid'->rfc822($self->email)
114 0 0 0 $ra and ref $ra eq 'HASH'
0 0 0 $ra and ref $ra eq 'HASH' and exists $ra->{'pw'}
0 0 0 $ra and ref $ra eq 'HASH' and exists $ra->{'pw'} and not Net::DRI::Util::xml_is_normalizedstring($ra->{'pw'})
117 0 0 0 $self->type and not $self->type =~ /^(?:privateperson|organisation|role)$/
131 0 0 0 $a and ref $a eq 'HASH'
0 0 0 $a and ref $a eq 'HASH' and exists $a->{'pw'}

or 2 conditions

line l !l condition
81 0 0 $change ||= 0

or 3 conditions

line l !l&&r !l&&!r condition
100 0 0 0 ref $rs[1] ne 'ARRAY' or @{$rs[1];} > 3
0 0 0 ref $rs[1] ne 'ARRAY' or @{$rs[1];} > 3 or grep {not Net::DRI::Util::xml_is_normalizedstring($_, undef, 255);} @{$rs[1];}