NAME
Net::DNS::Resolver::Recurse - Perform recursive DNS lookups
SYNOPSIS
use Net::DNS::Resolver::Recurse;
$resolver = new Net::DNS::Resolver::Recurse();
$packet = $resolver->query ( 'www.example.com', 'A' );
$packet = $resolver->search( 'www.example.com', 'A' );
$packet = $resolver->send ( 'www.example.com', 'A' );DESCRIPTION
This module is a subclass of Net::DNS::Resolver.
METHODS
This module inherits almost all the methods from Net::DNS::Resolver. Additional module-specific methods are described below.
hints
This method specifies a list of the IP addresses used to locate the authoritative name servers for the root (.) zone.
$resolver->hints(@ip);If no hints are passed, the default nameserver is used to discover the addresses of the root nameservers.
If the default nameserver not been configured correctly, or at all, a built-in list of IP addresses is used.
query, search, send
The query(), search() and send() methods produce the same result as their counterparts in Net::DNS::Resolver.
$packet = $resolver->send( 'www.example.com.', 'A' );Server-side recursion is suppressed by clearing the recurse flag in the packet and recursive name resolution is performed explicitly.
The query() and search() methods are inherited from Net::DNS::Resolver and invoke send() indirectly.
callback
This method specifies a code reference to a subroutine, which is then invoked at each stage of the recursive lookup.
For example to emulate dig's +trace function:
my $coderef = sub {
my $packet = shift;
$_->print for $packet->additional;
printf ";; Received %d bytes from %s\n\n",
$packet->answersize, $packet->answerfrom;
};
$resolver->callback($coderef);The callback subroutine is not called for queries for missing glue records.
ACKNOWLEDGEMENT
This package is an improved and compatible reimplementation of the Net::DNS::Resolver::Recurse.pm created by Rob Brown in 2002.
The contribution of Rob Brown is gratefully acknowledged.
COPYRIGHT
Copyright (c)2014 Dick Franks
Portions Copyright (c)2002 Rob Brown
All rights reserved.
This program is free software; you may redistribute it and/or modify it under the same terms as Perl itself.