diff options
| author |   William Heimbigner <william.heimbigner@gmail.com> | 2016-02-21 01:47:19 -0700 |
|---|---|---|
| committer | William Heimbigner <william.heimbigner@gmail.com> | 2016-02-21 01:47:19 -0700 |
| commit | 6f0f5a7f1ad7409c92b36feeaa543457fc321f83 (patch) | |
| tree | a06ee0d8edfdf667b66d18bbfdeb8b028d808844 /lib | |
| parent | d7ea76e9fcf7ce323542e7d19c19426293dfbb4a (diff) | |
Clean up some warnings being generated for unknown reasons pertaining to DNS issues
Diffstat (limited to 'lib')
| -rw-r--r-- | lib/ASM/Util.pm | 4 |
1 files changed, 3 insertions, 1 deletions
diff --git a/lib/ASM/Util.pm b/lib/ASM/Util.pm index 4b0137d..8e3fe8c 100644 --- a/lib/ASM/Util.pm +++ b/lib/ASM/Util.pm @@ -267,7 +267,9 @@ sub stripResp return undef; } my @answer = $response->answer; - if ($response->{header}->{rcode} ne "NOERROR") { + if ((!defined($response->{header})) || + (!defined($response->{header}->{rcode})) || + ($response->{header}->{rcode} ne "NOERROR")) { dprint($module, Dumper($response), 'dns'); return undef; } |