NAME
DNS::SerialNumber::Check - check the consistency of a zone's DNS serial number
VERSION
Version 0.02
SYNOPSIS
use DNS::SerialNumber::Check;
my $sn = DNS::SerialNumber::Check->new;
my $re = $sn->check("example.com"); # or,
my $re = $sn->check("example.com",['ns1.example.com','ns2.example.com']);
print $re->status;
use Data::Dumper;
print Dumper $re->info;METHODS
new()
Initialize the object.
my $sn = DNS::SerialNumber::Check->new;check(zonename,[nameservers])
Check if the zone serial number in each nameserver for the given zonename is consistent.
my $re = $sn->check("example.com"); # or,
my $re = $sn->check("example.com",['ns1.example.com','ns2.example.com']);The first will check from the zone's default nameservers (from its NS records). The second will check from the specified nameservers you provided.
status()
Shows the status code within the result, 1 for OK, 0 for BAD.
print $re->status;info()
A hashref, shows each nameserver of the zone with the serial number.
use Data::Dumper;
print Dumper $re->info;SEE ALSO
Net::DNS
AUTHOR
Ken Peng <yhpeng@cpan.org>
BUGS/LIMITATIONS
If you have found bugs, please send email to <yhpeng@cpan.org>
SUPPORT
You can find documentation for this module with the perldoc command.
perldoc DNS::SerialNumber::CheckCOPYRIGHT & LICENSE
Copyright 2011 Ken Peng, all rights reserved.
This program is free software; you can redistribute it and/or modify it under the same terms as Perl itself.