Branch Coverage

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


line true false branch
68 0 0 unless defined $reseller and !ref($reseller) || ref $reseller eq 'ARRAY'
69 0 0 if $command ne 'check' and ref $reseller
70 0 0 ref $reseller ? :
72 0 0 unless Net::DRI::Util::xml_is_token($id, 3, 16)
95 0 0 unless $mes->is_success
98 0 0 unless defined $chkdata
106 0 0 if ($n eq 'id') { }
0 0 elsif ($n eq 'reason') { }
113 0 0 $c->hasAttribute('lang') ? :
134 0 0 unless $mes->is_success
137 0 0 unless defined $data
149 0 0 if ($name =~ /^(?:id|roid|state|parentId|url)$/) { }
0 0 elsif ($name =~ /^(email)$/) { }
0 0 elsif ($name eq 'postalInfo') { }
0 0 elsif ($name eq 'voice' or $name eq 'fax') { }
0 0 elsif ($name eq 'contact') { }
0 0 elsif ($name =~ /^(clID|crID|upID)$/) { }
0 0 elsif ($name =~ /^(crDate|upDate)$/) { }
0 0 elsif ($name eq 'disclose') { }
152 0 0 if $key eq 'state'
166 0 0 unless exists $ccache{$id}
201 0 0 unless Net::DRI::Util::has_key($rd, 'status')
202 0 0 unless $$rd{'status'} =~ /^(?:ok|readonly|terminated)$/
205 0 0 if (Net::DRI::Util::has_key($rd, 'parent_id'))
207 0 0 unless Net::DRI::Util::xml_is_token($$rd{'parent_id'}, 3, 16)
212 0 0 unless Net::DRI::Util::has_contact($rd)
213 0 0 unless $cs->has_type('main')
220 0 0 if defined $co->voice
221 0 0 if defined $co->fax
224 0 0 unless Net::DRI::Util::has_key($rd, 'url')
225 0 0 unless Net::DRI::Util::xml_is_token($$rd{'url'}, 1, undef) and $$rd{'url'} =~ m[(?:([^:/?#]+):)?(?://([^/?#]*))?([^?#]*)(?:\?([^#]*))?(?:#(.*))?]
228 0 0 if (Net::DRI::Util::has_contact($rd))
234 0 0 if (defined $d)
236 0 0 unless ref $d eq 'HASH'
238 0 0 unless @dd
250 0 0 unless $mes->is_success
253 0 0 unless defined $credata
259 0 0 if ($name eq 'id') { }
0 0 elsif ($name eq 'crDate') { }
290 0 0 if (Net::DRI::Util::isa_contactset($cs))
296 0 0 if (Net::DRI::Util::isa_contactset($cs))
304 0 0 if defined $e
307 0 0 if defined $e
311 0 0 if (Net::DRI::Util::isa_contactset($cs))
314 0 0 if (defined $co and Net::DRI::Util::isa_contact($co)) { }
321 0 0 if defined $co->voice
322 0 0 if defined $co->fax
323 0 0 if defined $co->email
331 0 0 if defined $e
334 0 0 if (defined $co and defined($d = $co->disclose))
336 0 0 unless ref $d eq 'HASH'
338 0 0 unless @dd
342 0 0 unless @add or @del or @set
346 0 0 if @add
347 0 0 if @del
348 0 0 if @set