DNS & BIND Kochbuch

9.9 Eine Zone per Programmierung aktualisieren

Problem

Sie möchten eine Zone per Programmierung dynamisch aktualisieren.

Lösung

Selbst auf die Gefahr hin, dass ich mich wiederhole: Net::DNS glänzt auch in diesem Bereich. Das Senden dynamischer Updates mit dem C-Resolver ist ziemlich unerfreulich. Mit Net::DNS ist es ein Kinderspiel. Hier sehen Sie ein Skript, das dynamische Updates verwendet, um einen A-Record für einen Host hinzuzufügen:

#!/usr/bin/perl -w use Net::DNS; # Beenden, wenn der Benutzer den Domain-Namen und die Adresse eines # neuen Hosts nicht angegeben hat die "Verwendung: $0 <Host> <Adressen>" unless (@ARGV == 2); my $host = $ARGV[0]; my $zone = $host; my $addr = $ARGV[1]; my $primary; # (Vereinfachend) den Domain-Namen der Zone ...