Branch Coverage

blib/lib/Net/DRI/Protocol/EPP/Extensions/CIRA/Domain.pm
Criterion Covered Total %
branch 0 34 0.0


line true false branch
49 0 0 unless $mes->is_success
52 0 0 unless defined $infdata
57 0 0 if ($name eq 'domainStageOfLife') { }
0 0 elsif ($name eq 'domainStageOfLifeEnd') { }
71 0 0 unless Net::DRI::Util::has_contact($rd)
74 0 0 unless @c == 1 and Net::DRI::Util::isa_contact($c[0], 'Net::DRI::Data::Contact::CIRA') and length $c[0]->srid and $c[0]->validate(1)
76 0 0 unless @c == 1 and Net::DRI::Util::isa_contact($c[0], 'Net::DRI::Data::Contact::CIRA') and length $c[0]->srid and $c[0]->validate(1)
78 0 0 unless @c
79 0 0 if Net::DRI::Util::isa_contact($_, 'Net::DRI::Data::Contact::CIRA') and length $_->srid
0 0 if scalar @c != scalar grep({$_->validate(1) if Net::DRI::Util::isa_contact($_, 'Net::DRI::Data::Contact::CIRA') and length $_->srid;} @c) or @c > 3
87 0 0 unless Net::DRI::Util::has_contact($rd)
91 0 0 unless $cs->has_type('registrant') and $cs->has_type('admin')
93 0 0 unless @c == 1 and Net::DRI::Util::isa_contact($c[0], 'Net::DRI::Data::Contact::CIRA') and length $c[0]->srid and $c[0]->validate(1)
96 0 0 unless @c == 1 and Net::DRI::Util::isa_contact($c[0], 'Net::DRI::Data::Contact::CIRA') and length $c[0]->srid and $c[0]->validate(1)
99 0 0 if (@c)
101 0 0 if Net::DRI::Util::isa_contact($_, 'Net::DRI::Data::Contact::CIRA') and length $_->srid
0 0 if scalar @c != scalar grep({$_->validate(1) if Net::DRI::Util::isa_contact($_, 'Net::DRI::Data::Contact::CIRA') and length $_->srid;} @c) or @c > 3