Hello,
I ran into a presumably uncommon situation of a server returning an
answer for q VERSION.BIND TXT CH query (fpdns -f) which contains no
rdata. This results in an obscure error message from Text::ParseWords
complaining about an uninitialized value. Note, this does not occur
when running fpdns for some reason, I stopped trying to figure this
out when I solved my immediate problem in using the module by doing
the following:
--- bak.Fingerprint.pm 2006-03-30 09:51:15.000000000 -0600
+++ Fingerprint.pm 2006-03-30 10:15:44.000000000 -0600
@@ -494,7 +494,7 @@
if ($query && $query->header->ancount > 0) {
foreach my $rr ($query->answer) {
- ($rrset = $rrset . "\"" . $rr->txtdata . "\" ") if ($rr->type eq
"TXT");
+ ($rrset = $rrset . "\"" . $rr->txtdata . "\" ") if ($rr->type eq
"TXT" && $rr->rdlength > 0);
}
$rrset =~ s/\n/\" \"/g;
if (length($rrset) > $versionlength) {
John
_______________________________________________
fpdns mailing list
[email protected]
https://www.rfc.se/mailman/listinfo/fpdns
