| 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 |