Perl - Net :: DNS для создания PTR-записи

Question

Во-первых, соответствующий комикс xkcd: http://xkcd.com/979/

Далее, 10-летний поток на PerlMonks: http://www.perlmonks.org/?node_id=210422

В основном, я терплю неудачу в моих попытках использоватьNet :: DNS :: Update для создания PTR-записи, и я хотел бы посмотреть, как это удалось другим.

Ниже я попробую.$ hst - это имя хоста, для которого у меня уже есть запись A.$ rev - обратный IP-адрес in-addr.arpa thingy.

# Create the update packet:
my $update = Net::DNS::Update->new($OURDOMAIN);

#  Add the PTR record:
$update->push(update => rr_add("$rev 3600 PTR $hst"));

# Send the update to the zone's primary master.
my $res = Net::DNS::Resolver->new;
$res->nameservers("$OURNMSERV");

Answer 1

Если $OURDOMAIN является вашим основным доменным именем, вы должны знать, что вы не можете поместить записи PTR в свой собственный домен, они должны быть помещены в нужную .in-addr.arpa зону.

Скорее всего, этой зоной управляет ваш провайдер, и они вряд ли будут поддерживать динамические обновления от конечных пользователей.