Perl - Net :: DNS创建PTR记录

时间:2012-02-03 19:21:34

标签: perl dns

首先,相关的xkcd漫画:http://xkcd.com/979/

接下来,PerlMonks上的一个有10年历史的帖子:http://www.perlmonks.org/?node_id=210422

基本上,我没有尝试使用Net :: DNS :: Update创建PTR记录,我想看看其他人是如何管理这个记录的。

以下是我正在尝试的内容。 $ hst是我已有A记录的主机名。 $ rev是inaddr.arpa中的反向IP地址。

# 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");

1 个答案:

答案 0 :(得分:1)

如果$OURDOMAIN是您的主域名,您需要知道您不能将PTR记录放入您自己的域中,必须将它们放在正确的.in-addr.arpa区域中。

该区域最有可能由您的ISP运行,并且它们不太可能支持最终用户的动态更新。