Matthew Horsfall (alh) > Net-RNDC-0.002 > Net::RNDC

Download:
Net-RNDC-0.002.tar.gz

Dependencies

Annotate this POD

Website

View/Report Bugs
Module Version: 0.002   Source   Latest Release: Net-RNDC-0.003

NAME ^

Net::RNDC - Speak the BIND Remote Name Daemon Control (RNDC) V1 protocol

VERSION ^

version 0.002

SYNOPSIS ^

Simple synchronous command/response:

  use Net::RNDC;

  my $rndc = Net::RNDC->new(
    host => '127.0.0.1',
    port => 953,         # Defaults to 953
    key  => 'abcd',
  );

  if (!$rndc->do('status')) {
    die "RNDC failed: " . $rndc->error;
  }

  print $rndc->response;

All arguments to new() are allowed in do:

  my $rndc = Net::RNDC->new();

  my $key = 'abcd';

  for my $s (qw(127.0.0.1 127.0.0.2)) {
    if (!$rndc->do('status', key => $key, host => $s)) {
      my $err = $rndc->error;
    } else {
      my $resp = $rndc->response;
    }
  }

DESCRIPTION ^

This package provides a synchronous, easy to use interface to the RNDC V1 protocol. For more mid-level control, see Net::RNDC::Session, and for absolute control, Net::RNDC::Packet.

Constructor

new

  Net::RNDC->new(%args);

Optional Arguments:

Methods

do

  $rndc->do($command);

  $rndc->do($commands, %args);

Connects to the remote nameserver configured in "new" or passed in to %args and sends the specified command.

Returns 1 on success, 0 on failure.

Arguments:

Optional Arguments - See "new" above.

error

  $rndc->error;

Returns the last string error from a call to "do", if any. Only set if "do" returns 0.

response

  $rndc->response;

Returns the last string response from a call to "do", if any. Only set if "do" returns 1.

SEE ALSO ^

Net::RNDC::Session - Manage the 4-packet RNDC session

Net::RNDC::Packet - Low level RNDC packet manipulation.

AUTHOR ^

Matthew Horsfall (alh) <WolfSage@gmail.com>

LICENSE ^

You may distribute this code under the same terms as Perl itself.

syntax highlighting: