"得到"不在perl工作

0 perl get lwp

我是新来的perl.在过去的几天里,我制作了一些简单的脚本,通过"get"将网站的源代码保存到我的电脑上.他们做他们应该做的事,但不会得到一个论坛的网站的内容.非论坛网站工作得很好.知道发生了什么事吗?这是问题块:

my $url = 'http://www.computerforum.com/';
my $content = get $url || die "Unable to get content";
Run Code Online (Sandbox Code Playgroud)

dax*_*xim 7

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

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

使用此功能访问Web时,您将无法检查响应代码或响应标头(如"Content-Type").如果您需要该信息,则应使用完整的OO接口(请参阅LWP :: UserAgent).

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