Help for this page

Select Code to Download

Select or download this

   # Create the update packet:
   my $update = Net::DNS::Update->new($OURDOMAIN);
...
   $res->nameservers("$OURNMSERV");

   my $reply = $res->send($update);