Anonymous Monk has asked for the wisdom of the Perl Monks concerning the following question:
Hi.
I want to write a script to make updates to a DNS-Server. adding A records works fine - but I can t find examles for reverse-lookup updates (in-addr.arpa). I have tried things like that:
. .
. . but always get "NOTZONE" as returnmessage from the DNS-server.
Thanks to all Perl Monks,
wolfgang arztmann
I want to write a script to make updates to a DNS-Server. adding A records works fine - but I can t find examles for reverse-lookup updates (in-addr.arpa). I have tried things like that:
. .
my ($host,$ip,$type) = @_; my @adr = split /\./,$ip; my $revZone = "$adr[3]$adr[2].$adr[1].$adr[0].in-addr.arpa."; my $completeHostString = "$host.$DnsDomain."; my $update = Net::DNS::Update->new($DnsDomain); $update->push("pre", nxrrset("$revZone $type $completeHostString")); $update->push("update", rr_add("$revZone 86400 IN $type $completeHostS +tring")); my $res = Net::DNS::Resolver->new; $res->nameservers($DnsServer); my $reply = $res->send($update);
. . but always get "NOTZONE" as returnmessage from the DNS-server.
Thanks to all Perl Monks,
wolfgang arztmann
|
---|
Replies are listed 'Best First'. | |
---|---|
Re: net::dns::update and in-addr.arpa ??
by traveler (Parson) on Nov 04, 2002 at 18:06 UTC | |
by Anonymous Monk on Nov 05, 2002 at 10:26 UTC | |
by traveler (Parson) on Nov 05, 2002 at 14:46 UTC | |
by Anonymous Monk on Feb 02, 2012 at 21:18 UTC | |
by Anonymous Monk on Feb 08, 2012 at 02:07 UTC | |
Re: net::dns::update and in-addr.arpa ??
by fglock (Vicar) on Nov 04, 2002 at 16:11 UTC |
Back to
Seekers of Perl Wisdom