Perl: get() from LWP::Simple 已经过时了

Question

我只是想用函数get获取数据，但它总是返回undef，所以我想知道这个方法是否仍然有效？感谢您的反馈。

代码示例：

my $content = get("https://www.uniprot.org/uniprot/?query=KZS17205.1&format=tab&columns=entry%20name");
print $content;

Answer 1

如果函数已过时，那么它将在某处清楚地记录下来。

我看到您正在尝试获取https URL。如果您尝试获得http，它是否有效？

您需要做更多的工作才能将 LWP：：Simple 与 https 一起使用。这在自述文件中进行了描述。LWP 发行版附带的 SSL。目前，它是这样说的：

从libwww-perl v6.02开始，你需要安装LWP：:P rotocol：：https 模块来自其自己的独立发行版，以支持 https://...LWP：：UserAgent的网址。

这使得这成为可能 分发，将所需的依赖项声明为非可选依赖项。 看 https://rt.cpan.org/Ticket/Display.html?id=66838 进一步 讨论为什么我们最终得到了这个解决方案。

所以解决方案是（几乎可以肯定）安装 LWP：:P rotocol：：https。