line |
true |
false |
branch |
47
|
0 |
0 |
ref $rr eq 'ARRAY' ? : |
49
|
0 |
0 |
if grep {ref $_ ne 'HASH';} @d |
54
|
0 |
0 |
unless Net::DRI::Util::has_key($r, 'type') |
55
|
0 |
0 |
unless Net::DRI::Util::xml_is_token($$r{'type'}) |
57
|
0 |
0 |
if (Net::DRI::Util::has_key($r, 'class')) { } |
59
|
0 |
0 |
unless Net::DRI::Util::xml_is_token($$r{'class'}) |
65
|
0 |
0 |
if (Net::DRI::Util::has_key($r, 'ttl')) |
67
|
0 |
0 |
unless Net::DRI::Util::verify_int($$r{'ttl'}) |
70
|
0 |
0 |
unless Net::DRI::Util::has_key($r, 'rdata') |
71
|
0 |
0 |
unless Net::DRI::Util::xml_is_token($$r{'rdata'}) |
83
|
0 |
0 |
unless Net::DRI::Util::has_key($rp, 'zone') |
94
|
0 |
0 |
unless $mes->is_success |
97
|
0 |
0 |
unless defined $data |
104
|
0 |
0 |
if ($name eq 'rrec') |
109
|
0 |
0 |
if ($subname =~ /^(type|class|ttl|rdata)$/) |
126
|
0 |
0 |
if (grep {not /^(?:add|del)$/;} $todo->types('zone')) |
133
|
0 |
0 |
unless $zadd or $zdel |
136
|
0 |
0 |
if $zadd |
137
|
0 |
0 |
if $zdel |