Net::DNS::Resolver::RecurseSection: User Contributed Perl Documentation (3)Updated: 2004-08-12 |
Net::DNS::Resolver::RecurseSection: User Contributed Perl Documentation (3)Updated: 2004-08-12 |
use Net::DNS::Resolver::Recurse; my $res = Net::DNS::Resolver::Recurse->new;
$res->hints(@ips);
If no hints are passed, the default nameserver is asked for the hints. Normally these IPs can be obtained from the following location:
ftp://ftp.internic.net/domain/named.root
$res->recursion_callback(sub {
my $packet = shift;
$_->print for $packet->additional;
printf(";; Received %d bytes from %s\n\n",
$packet->answersize,
$packet->answerfrom
);
});
$packet = $res->query_dorecursion( "www.netscape.com.", "A");
This module is free software; you can redistribute it and/or modify it under the same terms as Perl itself.
$Id: Recurse.pm 102 2004-08-12 05:16:06Z ctriv $