> Why is it when I turn off debug mode, I get no output?
What output do you get when you don't turn off debug?
--
I found what is causing this, $query is 'undef'
So was it the intent of the person who wrote this module to have this code act
in this way?
Do you have a recommendation on how to make this more usable in terms of
success/failure lookups for client nodes for each BIND server?
my $query = $res->query("CLIENT_IP");
use Data::Dumper;
print Dumper($query);
using Data::Dumper with debug off I get: $VAR1 = undef;
but with debug on, I seem to get an answer
__OUTPUT__
;; query(x.x.x.x)
;; setting up an AF_INET() family type UDP socket
;; send_udp(x.x.x.x)
;; answer from x.x.x.x:53 : 43 bytes
;; HEADER SECTION
;; id = 6637
;; qr = 1 opcode = QUERY aa = 0 tc = 0 rd = 0
;; ra = 1 ad = 0 cd = 0 rcode = SERVFAIL
;; qdcount = 1 ancount = 0 nscount = 0 arcount = 0
;; QUESTION SECTION (1 record)
;; x.x.x.x.in-addr.arpa. IN PTR
;; ANSWER SECTION (0 records)
;; AUTHORITY SECTION (0 records)
;; ADDITIONAL SECTION (0 records)
RCODE: SERVFAIL; trying next nameserver
;; send_udp(x.x.x.x:53)
;; answer from x.x.x.x:53 : 474 bytes
;; HEADER SECTION
;; id = 6637
;; qr = 1 opcode = QUERY aa = 0 tc = 0 rd = 0
;; ra = 1 ad = 0 cd = 0 rcode = NOERROR
;; qdcount = 1 ancount = 0 nscount = 13 arcount = 13
;; QUESTION SECTION (1 record)
;; x.x.x.x.in-addr.arpa. IN PTR
;; ANSWER SECTION (0 records)
;; AUTHORITY SECTION (13 records)
. 10302 IN NS i.root-servers.net.
. 10302 IN NS g.root-servers.net.
. 10302 IN NS k.root-servers.net.
. 10302 IN NS b.root-servers.net.
. 10302 IN NS c.root-servers.net.
. 10302 IN NS f.root-servers.net.
. 10302 IN NS e.root-servers.net.
. 10302 IN NS d.root-servers.net.
. 10302 IN NS m.root-servers.net.
. 10302 IN NS l.root-servers.net.
. 10302 IN NS j.root-servers.net.
. 10302 IN NS a.root-servers.net.
. 10302 IN NS h.root-servers.net.
;; ADDITIONAL SECTION (13 records)
i.root-servers.net. 10302 IN A 192.36.148.17
g.root-servers.net. 10302 IN A 192.112.36.4
k.root-servers.net. 10302 IN A 193.0.14.129
b.root-servers.net. 10302 IN A 192.228.79.201
c.root-servers.net. 10302 IN A 192.33.4.12
f.root-servers.net. 10302 IN A 192.5.5.241
e.root-servers.net. 10302 IN A 192.203.230.10
d.root-servers.net. 10302 IN A 128.8.10.90
m.root-servers.net. 10302 IN A 202.12.27.33
l.root-servers.net. 10302 IN A 198.32.64.12
j.root-servers.net. 10302 IN A 192.58.128.30
a.root-servers.net. 10302 IN A 198.41.0.4
h.root-servers.net. 10302 IN A 128.63.2.53
$VAR1 = undef;
__________________________________________________
Do You Yahoo!?
Tired of spam? Yahoo! Mail has the best spam protection around
http://mail.yahoo.com
--
To unsubscribe, e-mail: [EMAIL PROTECTED]
For additional commands, e-mail: [EMAIL PROTECTED]
http://learn.perl.org/
