Perl 如何配置LWPx:：ParanoidAgent以使用/etc/hosts

最近，我从使用LWP:：UserAgent切换到LWPx:：ParanoidAgent来获取第三方提供的URL

这一切都很好，只是有时需要在/etc/hosts中查找来解析域。LWP:：UserAgent自动执行此操作，但LWPx:：ParanoidAgent只查询真正的DNS服务器

如何将LWPx:：ParanoidAgent配置为也搜索/etc/hosts

更新：

---

该模块允许我设置DNS解析程序（Net:：DNS:：resolver）。有没有办法让DNS解析器也可以查看/etc/hosts？

我查看了模块的源代码。无法将其配置为执行此操作

顺便说一句，它没有使用普通的名称解析系统，因为它想知道主机是否解析为另一个主机名（即，当它是CNAME时），因此它可以根据主机黑名单和白名单检查该主机名

---

如果您想添加此功能，我建议将

LWPx:：ParanoidAgent:：_resolve

包装为直接检查

/etc/hosts

（当

时）！$depth

）的内容，然后返回原始

\u resolve

。提供一个与Net:：DNS:：Resolver相似的解析程序将需要更多的工作。

您似乎可以设置一个DNS解析程序。我希望有一种聪明的方法来设置一个DNS解析器，它也可以查看/etc/hosts。是的，您可以编写自己的解析器，它提供与Net:：DNS:：resolver相同的接口。实际上，在返回到原始的

\u resolve

之前，直接使用检查

/etc/hosts

的内容包装

\u resolve

会更容易。