perl - 複数のネームサーバーからの DNS リゾルバーの結果

Question

Net::DNS::Resolverコンストラクターに 2 つのネーム サーバーを渡していますが、返される結果は 1 つだけです。

すべてのネームサーバーから結果を受け取るには、コードをどのように変更すればよいですか?

sub resolve_dns()
{
    my $dns = $_[0];
    my $res   = Net::DNS::Resolver->new(

                nameservers => [qw(24.116.197.232 114.130.11.67 )],
                recurse     => 0,
                debug       => 1,
                tcp_timeout => 3
                );
    my $query = $res->search($dns);

    if ($query) {
        foreach my $rr ($query->answer) {
            next unless $rr->type eq "A";
            print $rr->address, "\n";
        }
    } else {
        warn "query failed: ", $res->errorstring, "\n";
    }
}