DNS::Oterica::RecordMaker::Diagnostic - a collector of record generation requests, for testing

DNS-Oterica documentation Contained in the DNS-Oterica distribution.

Index

Code Index:

NAME

Top

DNS::Oterica::RecordMaker::Diagnostic - a collector of record generation requests, for testing

VERSION

Top

version 0.100001

DESCRIPTION

Top

This recordmaker returns hashrefs describing the requested record.

At present, the returned data are very simple. They will change and improve over time.

AUTHOR

Top

Ricardo SIGNES <rjbs@cpan.org>

COPYRIGHT AND LICENSE

Top

This software is copyright (c) 2011 by Ricardo SIGNES.

This is free software; you can redistribute it and/or modify it under the same terms as the Perl 5 programming language system itself.

DNS-Oterica documentation Contained in the DNS-Oterica distribution. 
use strict;
use warnings;
package DNS::Oterica::RecordMaker::Diagnostic;
BEGIN {
  $DNS::Oterica::RecordMaker::Diagnostic::VERSION = '0.100001';
}
# ABSTRACT: a collector of record generation requests, for testing

use Sub::Install;


my @types = qw(
  comment
  a_and_ptr
  ptr
  soa_and_ns_for_ip
  a
  mx
  domain
  soa_and_ns
  cname
  txt
);

for my $type (@types) {
  my $code = sub {
    return {
      type => $type,
      args => [ @_ ],
    };
  };

  Sub::Install::install_sub({ code => $code, as => $type });
}

1;

__END__