Select Code to Download

use Net::ADNS qw(ADNS_R_A ADNS_R_A);
$adns = Net::ADNS->new;
use Data::Dumper;
...
                print "resolved query: ", Dumper $answer;
        }
}

==8942== Process terminating with default action of signal 11 (SIGSEGV
+)
==8942==  Access not within mapped region at address 0x8
==8942==    at 0x4097D17: Perl_sv_unmagic (in /usr/lib/perl5/5.8.8/i38
+6-linux-thread-multi/CORE/libperl.so)
...
==8942==    by 0x4094DE9: Perl_sv_clean_objs (in /usr/lib/perl5/5.8.8/
+i386-linux-thread-multi/CORE/libperl.so)
==8942==    by 0x403297A: perl_destruct (in /usr/lib/perl5/5.8.8/i386-
+linux-thread-multi/CORE/libperl.so)
==8942==    by 0x80491C6: main (in /usr/bin/perl)