Subject: | Net::DNS 0.76 onwards is broken, can't print a simple packet. |
Date: | Sat, 14 Jun 2014 08:55:13 +1000 |
To: | bug-Net-DNS [...] rt.cpan.org |
From: | Mark Andrews <marka [...] isc.org> |
The following test code works on 0.75 and fails on 0.76, 0.77 and trunk
Mark
% more xxx.pl
use Net::DNS;
use Net::DNS::Packet;
my $buf = pack "H*", "63270000000100000000000100000200010000291000000080000000";
my $packet = new Net::DNS::Packet(\$buf, 0);
$packet->print;
% perl -I ~/svn/net-dns/trunk/lib/ xxx.pl
Can't call method "decode" on an undefined value at /Users/marka/svn/net-dns/trunk/lib//Net/DNS/Domain.pm line 283.
%