Skip Menu |

This queue is for tickets about the Net-DNS-Dig CPAN distribution.

Report information
The Basics
Id: 100447
Status: rejected
Priority: 0/
Queue: Net-DNS-Dig

People
Owner: Nobody in particular
Requestors: cpan [...] iijo.org
Cc:
AdminCc:

Bug Information
Severity: Important
Broken in: 0.12
Fixed in: (no value)



Subject: Nothing works?
This looks like a really great module. Unfortunately atm I don't think it works. use Net::DNS::Dig; my $dig = Net::DNS::Dig->new(); print $dig->for('duckduckgo.com')->sprintf; Here is the output I get: ; <<>> Net::DNS::Dig 0.12 <<>> -t ;; ;; Got answer. ;; ->>HEADER<<- opcode: , status: , id: ;; flags:; QUERY: , ANSWER: , AUTHORITY: , ADDITIONAL: ;; Query time: 3 ms ;; SERVER: 172.16.0.23# 53(172.16.0.23) ;; WHEN: Wed Nov 19 10:37:50 2014 ;; MSG SIZE rcvd: 96 -- XFR size: 5 records It does appear to be getting a response from the name servers because I can see data in there. For example, the ttl. I wonder if its an encoding issue? use DDP; p $dig->rdata('A'); [ '6, 'k=', '�Hj4', '�HsV' ] Thanks, Kablamo
Sorry am an idiot. I guess $dig->to_text() and $dig->sprintf() don't work, but everything does I think. Doesn't seem like I can downgrade the ticket from critical now in RT. On Wed Nov 19 10:43:39 2014, kablamo wrote: Show quoted text
> This looks like a really great module. Unfortunately atm I don't > think it works. > > use Net::DNS::Dig; > > my $dig = Net::DNS::Dig->new(); > print $dig->for('duckduckgo.com')->sprintf; > > Here is the output I get: > > ; <<>> Net::DNS::Dig 0.12 <<>> -t > ;; > ;; Got answer. > ;; ->>HEADER<<- opcode: , status: , id: > ;; flags:; QUERY: , ANSWER: , AUTHORITY: , ADDITIONAL: > > ;; Query time: 3 ms > ;; SERVER: 172.16.0.23# 53(172.16.0.23) > ;; WHEN: Wed Nov 19 10:37:50 2014 > ;; MSG SIZE rcvd: 96 -- XFR size: 5 records > > > It does appear to be getting a response from the name servers because > I can see data in there. For example, the ttl. I wonder if its an > encoding issue? > > use DDP; p $dig->rdata('A'); > [ > '6, > 'k=', > '�Hj4', > '�HsV' > ] > > > Thanks, > Kablamo

Message body is not shown because it is too large.

Thanks Mike. You are right I didn't read the pod closely enough. However \sprintf() and to_text() don't work for me. The example you mentioned in your email does not work for me: print Net::DNS::Dig->new()->for( 'duckduckgo.com' )->sprintf; Here is the output I get: ; <<>> Net::DNS::Dig 0.12 <<>> -t ;; ;; Got answer. ;; ->>HEADER<<- opcode: , status: , id: ;; flags:; QUERY: , ANSWER: , AUTHORITY: , ADDITIONAL: ;; Query time: 4 ms ;; SERVER: 172.16.0.23# 53(172.16.0.23) ;; WHEN: Wed Nov 19 19:10:53 2014 ;; MSG SIZE rcvd: 96 -- XFR size: 5 records