Branch Coverage

blib/lib/Net/DRI/Protocol/EPP/Extensions/KeyRelay.pm
Criterion Covered Total %
branch 0 56 0.0


line true false branch
62 0 0 unless $d[$wi] > 0
65 0 0 if length $tmp
71 0 0 unless $d[$wi] > 0
74 0 0 if length $tmp
83 0 0 unless defined $domain and length $domain
84 0 0 unless Net::DRI::Util::xml_is_token($domain, 1, 255)
90 0 0 unless Net::DRI::Util::has_key($rd, 'secdns')
91 0 0 unless ref $$rd{'secdns'} eq 'ARRAY' and @{$$rd{'secdns'};}
94 0 0 unless Net::DRI::Util::has_auth($rd)
95 0 0 exists $$rd{'auth'}{'roid'} ? :
98 0 0 if (Net::DRI::Util::has_key($rd, 'expiry'))
101 0 0 if (Net::DRI::Util::is_class($exp, 'DateTime')) { }
0 0 elsif (Net::DRI::Util::is_class($exp, 'DateTime::Duration')) { }
127 0 0 unless $tmp =~ s/^P//
131 0 0 if ($token eq 'T')
137 0 0 unless exists $$rm{$t}
147 0 0 unless $mes->is_success
150 0 0 unless defined $data
156 0 0 if ($name eq 'name') { }
0 0 elsif ($name eq 'keyRelayData') { }
0 0 elsif ($name eq 'crDate') { }
0 0 elsif ($name =~ /^(?:reID|acID)$/) { }
188 0 0 if ($name eq 'name') { }
0 0 elsif ($name eq 'keyData') { }
0 0 elsif ($name eq 'authInfo') { }
0 0 elsif ($name eq 'expiry') { }
202 0 0 if (defined($exp = Net::DRI::Util::xml_child_content($node, $ns, 'absolute'))) { }
0 0 elsif (defined($exp = Net::DRI::Util::xml_child_content($node, $ns, 'relative'))) { }