line |
true |
false |
branch |
81
|
1 |
0 |
if $version eq '2.0' |
88
|
0 |
7 |
unless defined $domain and $domain |
89
|
0 |
7 |
unless $domain =~ /^[a-z0-9]([a-z0-9\-]{0,61}[a-z0-9])?\.[a-z0-9]([a-z0-9\-]{0,61}[a-z0-9])?$/i |
90
|
7 |
0 |
if defined $command |
103
|
1 |
0 |
if (Net::DRI::Util::has_duration($rd)) |
106
|
0 |
1 |
unless Net::DRI::Util::isint($period) |
110
|
0 |
1 |
if (Net::DRI::Util::has_ns($rd)) |
121
|
0 |
1 |
unless $mes->is_success |
136
|
0 |
0 |
if exists $$rinfo{'domain'}{$oname}{'action'} |
157
|
0 |
2 |
unless $mes->is_success |
159
|
2 |
0 |
if ($mes->errcode == 211) { } |
|
0 |
0 |
elsif ($mes->errcode == 210) { } |
174
|
0 |
1 |
unless $mes->is_success |
182
|
0 |
4 |
unless $d |
189
|
0 |
3 |
unless $d |
206
|
0 |
0 |
defined $rd && ref $rd && exists $$rd{'approve'} && $$rd{'approve'} ? : |
216
|
0 |
3 |
unless Net::DRI::Util::isa_changes($todo) |
217
|
0 |
3 |
if (grep {not /^(?:ns|status)$/;} $todo->types or grep {not /^(?:add|del)$/;} $todo->types('ns') or grep {not /^(?:add|del)$/;} $todo->types('status')) |
232
|
2 |
1 |
if (defined $nsadd and not $nsadd->is_empty) |
233
|
2 |
1 |
if (defined $nsdel and not $nsdel->is_empty) |
236
|
0 |
3 |
if (defined $statadd) |
237
|
0 |
3 |
if (defined $statdel) |
245
|
0 |
0 |
if (defined $rd and ref $rd eq 'HASH' and keys %$rd) |
250
|
0 |
0 |
if defined $curexp xor defined $period |
251
|
0 |
0 |
if (defined $curexp) |
255
|
0 |
0 |
unless Net::DRI::Util::isint($period) |
256
|
0 |
0 |
if ref $curexp and $curexp->can('year') |
257
|
0 |
0 |
unless $curexp =~ /^\d{4}$/ |
262
|
0 |
0 |
if defined $period and defined $curexp |