NAME

Net::DNS::Version - Perl module to grab DNS server version

SYNOPSIS

use Net::DNS::Version;

my $host = $ARGV[0];

my $scan = Net::DNS::Version->new({
  host    => $host,
  timeout => 5
});

my $version = $scan->check;
print "$host : $version\n";

DESCRIPTION

This module permit to grab DNS server version.

METHODS

new

The constructor. Given a host returns a Net::DNS::Version object:

my $scan = Net::DNS::Version->new({ host => "127.0.0.1" });

Optionally, you can also specify :

port

remote port. Default is 53 udp;

timeout

default is 8 seconds;

check

Checks the target.

$scan->check;

SEE ALSO

man dig

AUTHOR

Matteo Cantoni, <mcantoni@cpan.org>

COPYRIGHT AND LICENSE

You may distribute this module under the terms of the Artistic license. See Copying file in the source distribution archive.

Copyright (c) 2006, Matteo Cantoni