Net::Dynect::REST::Zone - List changes pending for a DNS zone
use Net::Dynect::REST; use Net::Dynect::REST::Zone; $dynect = Net::Dynect::REST->new(user_name => 'me', customer_name => 'myco', password => 'secret'); $zone = Net::Dynect::REST::Zone->new(connection => $dynect, zone => 'example.com'); print "Zone details: $zone\n"; $zone->freeze; $zone->thaw; $zone->publish; $zone->delete; $new_zone = Net::Dynect::REST::Zone->new(connection => $dynect); $zone->name('new.example.com'); $zone->serial_style('increment'); $zone->zone_type('Primary'); $zone->save(rname => 'firstname.lastname@example.org', ttl => 900);
A Net::Dynect::REST::Zone is a representation of a DNS Zone in the Dynect REST interface. It permits the user to load zones that already exist, inspect their attributes (eg, serial number), freeze the zone from modification, thaw the zone, publish zone changes live, delete the zone, and create a new zone.
Creates and returns a Net::Dynect::REST::Zone object. You should pass this method your connection object, which should have a valid session established, in order to do anything useful.
This will attempt to get the details of the zone from Dynect.
This will try to save a new zone (which has already had its name and serial style set via the "Attributes" below). You must supply the "rname" parameter of the email address for the resposible person, and you may supply a ttl value.
This will tryt o delete the zone that was previously loaded.
This will freeze the zone from any changes.
This will unfreeze the zone and permit changes.
This will commit changes to the zone to the live production environment.
This will get (or set) the zone's name, eg: example.com.
This will get (or set) the zones serial number.
This will get (or set) the zone type, either:
This will get or set the serial style for the zone, either
James Bromberger, email@example.com
Copyright (C) 2010 by James Bromberger
This library is free software; you can redistribute it and/or modify it under the same terms as Perl itself, either Perl version 5.10.1 or, at your option, any later version of Perl 5 you may have available.