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

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";

This module permit to grab DNS server version.

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 :
Checks the target.
$scan->check;

man dig

Matteo Cantoni, <mcantoni@cpan.org>

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