| blib/lib/Net/DNS/Resolver/Recurse.pm | |||
|---|---|---|---|
| Criterion | Covered | Total | % |
| branch | 24 | 24 | 100.0 |
| line | true | false | branch |
|---|---|---|---|
| 58 | 2 | 2 | unless scalar @argument |
| 98 | 5 | 22 | unless (scalar @$root) |
| 100 | 4 | 1 | scalar @hints ? : |
| 119 | 3 | 71 | unless $reply |
| 122 | 12 | 47 | if grep {lc $_->owner eq $qname;} $reply->answer |
| 129 | 3 | 73 | unless $packet |
| 132 | 12 | 61 | unless scalar @auth |
| 135 | 39 | 2 | if $cache and scalar @$cache |
| 141 | 222 | 1908 | $ns eq lc $_->owner ? : |
| 143 | 5 | 17 | unless scalar @ip |
| 144 | 5 | 17 | unless scalar @ip |
| 183 | 7 | 72 | if $callback |