Ken Peng > DNS-SerialNumber-Check-0.02 > DNS::SerialNumber::Check

Download:
DNS-SerialNumber-Check-0.02.tgz

Dependencies

Annotate this POD

View/Report Bugs
Module Version: 0.02   Source  

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::Check

COPYRIGHT & 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.

syntax highlighting: