如何在 Unix/Linux 上使用 perl 执行批量 DNS 查询？

Question

我有一个正在尝试获取 IP 地址的系统列表。我已成功使用 Perl 的 Net::DNS 模块对单个主机名执行 IP 地址查询。然而，我有 1,000 个系统需要 IP 地址。

有没有办法通过一次查询获取所有这些 IP 地址？

如果没有，是否有办法获取整个 DNS 条目列表（例如单个域）？如果我知道了，那么我可以简单地将其放入哈希中并以这种方式引用 IP 地址。

Answer 1

无需定制 Perl。这可以使用 dig 的 -f 选项（BIND 工具的一部分）来完成：

$ dig -f /path/to/host-list.txt

Answer 2

对于大型域数据集，这将快速完成，而不需要真正解析结果； IP 始终位于 $results{$domain}[0][4] 中。这不是单个查询，但它们将同时完成（IIRC 一次最多进行 10 个查询），因此会很快完成。只需确保 DNS 服务器运营商在短时间内处理这么多请求不会出现问题。

use AnyEvent::DNS;
use Data::Dumper;

my @domains = qw/google.com/;
my $resolver = AnyEvent::DNS->new( server => '8.8.4.4' );
my %results;

### Set up the condvar
my $done = AE::cv;
$done->begin( sub { shift->send } );

for my $domain (@domains) {
  $done->begin;
  $resolver->resolve($domain, 'a', sub {push @{$results{$domain}}, \@_; $done->end;});
}

### Decrement the cv counter to cancel out the send declaration
$done->end;

### Wait for the resolver to perform all resolutions
$done->recv;

print Dumper \%results;

输出：

$VAR1 = {
          'google.com' => [
                            [
                              'google.com',
                              'a',
                              'in',
                              300,
                              '74.125.225.52'
                            ],
                            [
                              'google.com',
                              'a',
                              'in',
                              300,
                              '74.125.225.50'
                            ],
                            [
                              'google.com',
                              'a',
                              'in',
                              300,
                              '74.125.225.49'
                            ],
                            [
                              'google.com',
                              'a',
                              'in',
                              300,
                              '74.125.225.48'
                            ],
                            [
                              'google.com',
                              'a',
                              'in',
                              300,
                              '74.125.225.51'
                            ]
                          ]
        };