DNS::SerialNumber::Check - check the consistency of a zone's DNS serial number
Version 0.02
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;
Initialize the object.
my $sn = DNS::SerialNumber::Check->new;
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.
Shows the status code within the result, 1 for OK, 0 for BAD.
print $re->status;
A hashref, shows each nameserver of the zone with the serial number.
use Data::Dumper; print Dumper $re->info;
Net::DNS
Ken Peng <yhpeng@cpan.org>
If you have found bugs, please send email to <yhpeng@cpan.org>
You can find documentation for this module with the perldoc command.
perldoc DNS::SerialNumber::Check
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.
To install DNS::SerialNumber::Check, copy and paste the appropriate command in to your terminal.
cpanm
cpanm DNS::SerialNumber::Check
CPAN shell
perl -MCPAN -e shell install DNS::SerialNumber::Check
For more information on module installation, please visit the detailed CPAN module installation guide.