line |
true |
false |
branch |
59
|
0 |
0 |
if ($def and ref $def eq 'HASH' and exists $$def{'domain_create'} and ref $$def{'domain_create'} eq 'HASH') |
61
|
0 |
0 |
unless $rd and ref $rd eq 'HASH' and keys %$rd |
64
|
0 |
0 |
if exists $$rd{$k} |
70
|
0 |
0 |
if Net::DRI::Util::has_duration($rd) |
73
|
0 |
0 |
if Net::DRI::Util::has_ns($rd) |
76
|
0 |
0 |
if (Net::DRI::Util::has_contact($rd)) { } |
|
0 |
0 |
elsif ($$rd{'registrant'}) { } |
80
|
0 |
0 |
if @o and Net::DRI::Util::isa_contact($o[0]) |
88
|
0 |
0 |
if ($$rd{'description'}) |
105
|
0 |
0 |
unless Net::DRI::Util::isa_changes($todo) |
115
|
0 |
0 |
if Net::DRI::Util::isa_hosts($nsadd) |
116
|
0 |
0 |
if $sadd |
117
|
0 |
0 |
if $sadd |
118
|
0 |
0 |
if Net::DRI::Util::isa_hosts($nsdel) |
119
|
0 |
0 |
if $sdel |
120
|
0 |
0 |
if $sdel |
122
|
0 |
0 |
if @add |
123
|
0 |
0 |
if @del |
127
|
0 |
0 |
if Net::DRI::Util::isa_contact($chg) |
130
|
0 |
0 |
if ($chg) |
138
|
0 |
0 |
if @chg |
147
|
0 |
0 |
unless $mes->is_success |
149
|
0 |
0 |
unless defined $infdata |
155
|
0 |
0 |
if ($name eq 'description') |