我可以确定给定的“主机名”是通过Perl的CNAME [英] Can I determine if a given "hostname" is a CNAME via Perl
本文介绍了我可以确定给定的“主机名”是通过Perl的CNAME的处理方法,对大家解决问题具有一定的参考价值,需要的朋友们下面随着小编来一起学习吧!
问题描述
在工作中我有这样的东西...
At work I have something like this...
$ host www.something.com
www.something.com is an alias for some.other.address
some.other.address is an alias for one.more.address
one.more.address has address xxx.xxx.xxx.xxx
我想要一种方式,在Perl中放入 www.something.com
,并确定它是否是CNAME,A记录等。
I would like a way, in Perl to put in www.something.com
and determine if it's a CNAME, A record, etc.
推荐答案
use Net::DNS qw();
my $query = Net::DNS::Resolver->new->search('conferences.yapceurope.org');
if ($query) {
foreach my $rr ($query->answer) {
next unless 'CNAME' eq $rr->type;
print $rr->cname;
}
} else {
warn sprintf "query failed: %s\n", $res->errorstring;
}
这篇关于我可以确定给定的“主机名”是通过Perl的CNAME的文章就介绍到这了,希望我们推荐的答案对大家有所帮助,也希望大家多多支持IT屋!
查看全文