Subject: | Net::DNS::Dig 0.12 bug in dig.pl |
Date: | Tue, 13 May 2014 10:20:00 +0300 |
To: | bug-net-dns-dig [...] rt.cpan.org |
From: | Gabor Szabo <gabor [...] szabgab.com> |
dig.pl that comes with the modules has some problems.
It passes all the $config values as undef if they are not supplied on
the command line.
Instead of what it does now the $config hash should be filled only
with values that were actually
supplied by the user.
attached version is fixing the issues.
-------
I downloaded the dig.pl that comes with the module using
wget http://api.metacpan.org/source/MIKER/Net-DNS-Dig-0.12/examples/dig.pl
and tried to run it:
$ perl dig.pl perlmaven.com
unsupported Proto '' at
.../perl-5.18.2/lib/site_perl/5.18.2/Net/DNS/Dig.pm line 680.
Then I edited dig.pl, commented out
#Proto => $tcp,
and ran again:
$ perl dig.pl -t ns anymaven.com
; <<>> Net::DNS::Dig 0.12 <<>> -t ns anymaven.com.
;;
; Transfer failed.
;; Got answer.
;; ->>HEADER<<- opcode: QUERY, status: SERVFAIL, id: 48848
;; flags:; QUERY: 1, ANSWER: 0, AUTHORITY: 0, ADDITIONAL: 0
;anymaven.com. IN NS
OTOH
$ dig -t NS anymaven.com
; <<>> DiG 9.8.3-P1 <<>> -t NS anymaven.com
;; global options: +cmd
;; Got answer:
;; ->>HEADER<<- opcode: QUERY, status: NOERROR, id: 19433
;; flags: qr rd ra; QUERY: 1, ANSWER: 2, AUTHORITY: 0, ADDITIONAL: 1
;; OPT PSEUDOSECTION:
; EDNS: version: 0, flags: do; udp: 4096
;; QUESTION SECTION:
;anymaven.com. IN NS
;; ANSWER SECTION:
anymaven.com. 3600 IN NS s7.hostlocal.com.
anymaven.com. 3600 IN NS ns4.tracert.com.
;; Query time: 90 msec
;; SERVER: 192.168.1.1#53(192.168.1.1)
;; WHEN: Tue May 13 09:48:01 2014
;; MSG SIZE rcvd: 94
After commenting out all the other values in
my $config = {
#Timeout => $time,
#PeerAddr => $server,
#PeerPort => $port,
##Proto => $tcp,
#Recursion => $recurse,
};
it started to work:
$ perl dig.pl -t NS anymaven.com
; <<>> Net::DNS::Dig 0.12 <<>> -t ns anymaven.com.
;;
;; Got answer.
;; ->>HEADER<<- opcode: QUERY, status: NOERROR, id: 49653
;; flags: qr rd ra; QUERY: 1, ANSWER: 2, AUTHORITY: 0, ADDITIONAL: 1
;; QUESTION SECTION:
;anymaven.com. IN NS
;; ANSWER SECTION:
anymaven.com. 3132 IN NS ns4.tracert.com.
anymaven.com. 3132 IN NS s7.hostlocal.com.
;; ADDITIONAL SECTION:
. 32768 CLASS4096 OPT \# 0
;; Query time: 115 ms
;; SERVER: 192.168.1.1# 53(192.168.1.1)
;; WHEN: Tue May 13 09:55:49 2014
;; MSG SIZE rcvd: 94 -- XFR size: 4 records
Message body is not shown because sender requested not to inline it.