Проблема с обратным поиском DNS в Perl на Windows
У меня есть Perl-программа, которая работает в нашей сети и выполняет много обратных проверок DNS. На поиск уходит довольно много времени, может быть, на секунду или на три, и их около 50000... В любом случае, это не совсем сбой, поскольку он возвращает имя хоста, но только тогда, когда он может быть определен нетбиосом. система имен. Хосты, у которых нет имени netbios, но которые имеют запись на нашем DNS-сервере, не решаются. Использование nslookup и тому подобное показывает, что это, вероятно, не проблема с нашими DNS-серверами.
Я должен отметить, что в настоящее время я использую функцию gethostbyaddr.
Я читал, что Perl может запутаться, если у компьютера, на котором он работает, есть несколько сетевых карт и IP-адресов, как здесь. Я написал гигантский кладж, включающий выполнение поиска через внешнюю программу, но он медленный и неуклюжий и разрушает переносимость программы.
Мой вопрос: на сервере Windows с Perl 5.18, что может привести к сбою обратного просмотра DNS, все еще возвращая имя netbios... И что я могу сделать, чтобы решить эту проблему?
Или, если кто-то знает, как сказать Perl, что я ТОЛЬКО хочу имя netbios, я бы согласился на это, так как поиск будет выполняться быстрее, если они не будут ждать неудачи DNS.