| line |
true |
false |
branch |
|
94
|
0 |
0 |
wantarray ? : |
|
|
0 |
29 |
if $r[0] != &DNS::BL::DNSBL_OK |
|
100
|
0 |
29 |
unless (exists $args{'ip'} and $ip = 'NetAddr::IP'->new($args{'ip'})) |
|
102
|
0 |
0 |
wantarray ? : |
|
111
|
27 |
2 |
if (not exists $args{'without'}) { } |
|
|
0 |
2 |
elsif ($args{'without'} ne 'checking') { } |
|
115
|
27 |
0 |
wantarray ? : |
|
|
27 |
0 |
if $r[0] != &DNS::BL::DNSBL_ENOTFOUND |
|
122
|
0 |
0 |
wantarray ? : |
|
|
0 |
0 |
if $r[0] != &DNS::BL::DNSBL_ENOTFOUND |
|
130
|
0 |
0 |
wantarray ? : |
|
135
|
2 |
0 |
if exists $args{'text'} |
|
136
|
0 |
2 |
if exists $args{'time'} |
|
142
|
2 |
0 |
wantarray ? : |
|
|
2 |
0 |
if $r[0] != &DNS::BL::DNSBL_OK |
|
145
|
0 |
0 |
wantarray ? : |