我熟悉Perl中的Net::DNS
库,并使用
my $res = Net::DNS::Resolver->new();
然而,简单地尝试查询域名会显示很多垃圾值,尽管输出本身是正确的。这是代码段
#!/usr/bin/perl
use Net::DNS;
use Net::IP;
use Data::Dumper;
my $rr;
$domain = 'google.com';
my $res = Net::DNS::Resolver->new();
my $ns_req = $res->query($domain, "NS");
print "\n\n@@@\n".Dumper($ns_req)."\n@@@\n\n";
以下是针对此对象测试的各种域的2个输出:
这些垃圾值显示的是什么?有没有办法清理输出以便正确读取输出?