| line |
true |
false |
branch |
|
60
|
0 |
0 |
unless $self->brik_help_run_undef_arg('create_resolver', $nameserver) |
|
61
|
0 |
0 |
unless my $ref = $self->brik_help_run_invalid_arg('create_resolver', $nameserver, 'ARRAY', 'SCALAR') |
|
69
|
0 |
0 |
$self->log->level > 2 ? : |
|
82
|
0 |
0 |
if (defined $src_ip_address) |
|
86
|
0 |
0 |
if (defined $src_port) |
|
91
|
0 |
0 |
if ($ref eq 'ARRAY') { } |
|
101
|
0 |
0 |
unless (defined $resolver) |
|
125
|
0 |
0 |
unless $self->brik_help_run_undef_arg('lookup', $host) |
|
126
|
0 |
0 |
unless $self->brik_help_run_undef_arg('lookup', $nameserver) |
|
129
|
0 |
0 |
unless (defined $resolver) |
|
130
|
0 |
0 |
unless $self->create_resolver($nameserver, $port) |
|
140
|
0 |
0 |
if ($@) { } |
|
|
0 |
0 |
elsif (not defined $packet) { } |
|
162
|
0 |
0 |
if ($rr->can('address')) |
|
165
|
0 |
0 |
if ($rr->can('cname')) |
|
168
|
0 |
0 |
if ($rr->can('exchange')) |
|
171
|
0 |
0 |
if ($rr->can('nsdname')) |
|
174
|
0 |
0 |
if ($rr->can('ptrdname')) |
|
177
|
0 |
0 |
if ($rr->can('rdatastr')) |
|
180
|
0 |
0 |
if ($rr->can('dummy')) |
|
183
|
0 |
0 |
if ($rr->can('target')) |
|
200
|
0 |
0 |
unless $self->brik_help_run_undef_arg('background_lookup', $host) |
|
201
|
0 |
0 |
unless $self->brik_help_run_undef_arg('background_lookup', $nameserver) |
|
204
|
0 |
0 |
unless (defined $resolver) |
|
205
|
0 |
0 |
unless $self->create_resolver($nameserver, $port) |
|
215
|
0 |
0 |
if ($@) { } |
|
|
0 |
0 |
elsif (not defined $handle) { } |
|
217
|
0 |
0 |
ref $nameserver eq 'ARRAY' ? : |
|
223
|
0 |
0 |
ref $nameserver eq 'ARRAY' ? : |
|
238
|
0 |
0 |
unless $self->brik_help_set_undef_arg('resolver', $resolver) |
|
239
|
0 |
0 |
unless $self->brik_help_run_undef_arg('background_read', $handle) |
|
240
|
0 |
0 |
unless $self->brik_help_run_invalid_arg('background_read', $handle, 'IO::Socket::IP') |
|
244
|
0 |
0 |
if ($resolver->bgbusy($handle)) |
|
252
|
0 |
0 |
if ($@) { } |
|
|
0 |
0 |
elsif (not defined $packet) { } |
|
274
|
0 |
0 |
if ($rr->can('address')) |
|
277
|
0 |
0 |
if ($rr->can('cname')) |
|
280
|
0 |
0 |
if ($rr->can('exchange')) |
|
283
|
0 |
0 |
if ($rr->can('nsdname')) |
|
286
|
0 |
0 |
if ($rr->can('ptrdname')) |
|
289
|
0 |
0 |
if ($rr->can('rdatastr')) |
|
292
|
0 |
0 |
if ($rr->can('dummy')) |
|
295
|
0 |
0 |
if ($rr->can('target')) |
|
311
|
0 |
0 |
unless $self->brik_help_run_undef_arg('version_bind', $nameserver) |
|
315
|
0 |
0 |
$self->log->level > 2 ? : |
|
324
|
0 |
0 |
unless (defined $resolver) |
|
330
|
0 |
0 |
if (defined $res and exists $res->{'answer'}) |
|
332
|
0 |
0 |
if (defined $rr and exists $rr->{'rdata'}) |