perl - “get”在 perl 中不起作用

Question

我是 perl 的新手。在过去的几天里，我做了一些简单的脚本，通过“get”将网站的源代码保存到我的电脑中。他们做他们应该做的事，但不会获得作为论坛的网站的内容。非论坛网站工作得很好。知道发生了什么吗？这是问题块：

my $url = 'http://www.computerforum.com/';
my $content = get $url || die "Unable to get content";

Answer 1

http://p3rl.org/LWP::Simple#get：

get() 函数将获取由给定 URL 标识的文档并将其返回。如果失败则返回 undef。[…]

当您使用此功能访问网络时，您将无法检查响应代码或响应标头（如“Content-Type”）。如果您需要这些信息，您应该使用完整的 OO 接口（请参阅 LWP::UserAgent）。

你真的需要更好的错误报告，切换到LWP::UserAgent库。我怀疑论坛软件会阻止 LWP 用户代理。