blib/lib/Net/DNSBL/Client.pm | |||
---|---|---|---|
Criterion | Covered | Total | % |
condition | 34 | 44 | 77.2 |
line | !l | l&&!r | l&&r | condition |
---|---|---|---|---|
297 | 18 | 4 | 2 | $options and exists $$options{$opt} |
308 | 9 | 2 | 1 | $options and exists $$options{'lookup_keys'} |
11 | 0 | 1 | $options and exists $$options{'lookup_keys'} and ref $$options{'lookup_keys'} eq 'HASH' | |
366 | 11 | 0 | 1 | exists $$lookup_keys{$domain} and $$lookup_keys{$domain} ne '' |
384 | 21 | 1 | 0 | $sock1 and $sock2 |
425 | 2 | 10 | 0 | $got_a_hit and $$self{'early_exit'} |
449 | 28 | 2 | 6 | $$dnsbl{'hit'} and $$dnsbl{'type'} eq 'match' |
line | l | !l | condition |
---|---|---|---|
344 | 21 | 1 | $$entry{'type'} || 'normal' |
line | l | !l&&r | !l&&!r | condition |
---|---|---|---|---|
79 | 1 | 1 | 7 | not $$self{'timeout'} =~ /^\d+$/ or $$self{'timeout'} <= 0 |
262 | 1 | 1 | 0 | not $secs =~ /^\d+$/ or $secs <= 0 |
326 | 14 | 3 | 5 | $$r{'hit'} or $$self{'return_all'} |
374 | 0 | 1 | 0 | $sock1 ||= $$self{'resolver'}->bgsend("$ip_or_domain$lookup_key.$domain", 'TXT') |
379 | 10 | 11 | 0 | $sock2 ||= $$self{'resolver'}->bgsend("$ip_or_domain$lookup_key.$domain", 'A') |
436 | 0 | 2 | 10 | $rcode eq 'SERVFAIL' or $rcode eq 'NXDOMAIN' |
446 | 15 | 1 | 0 | $rr->type eq 'A' or uc $rr->type eq 'TXT' |