如何让 WWW::Mechanize 工作？答案

【问题标题】：How do I get WWW::Mechanize to work?如何让 WWW::Mechanize 工作？
【发布时间】：2009-05-27 14:39:18
【问题描述】：

这个脚本：

use strict;
use warnings;
use WWW::Mechanize;

my $mech = WWW::Mechanize->new( autocheck => 1 );

$mech->get( "http://www.google.com" );
print $mech->content;

产生此错误消息：

获取http://www.google.com 时出错：无法连接到 www.google.com:80 （连接：未知错误）在 D:\PERL\try.pl 第 5 行

怎么了？

【问题讨论】：

标签： perl www-mechanize

【解决方案1】：

从您的错误消息中，我看到您在 Windows 机器上 (D:\PERL\try.pl)。也许 Windows 防火墙不信任 Perl 访问互联网并阻止其流量？

如果您在 Windows 防火墙中添加允许 perl.exe 访问 Internet 的规则，可能会很幸运。

【讨论】：

【解决方案2】：

它以前有效吗？此代码适用于我的 Linux 机器。

可能是您没有互联网连接。
可能是 Google 屏蔽了你。

【讨论】：

不，我有互联网连接，所有网站都收到此错误....即使我尝试在我的系统中打开一个 html 文件，它也会抛出同样的错误。

【解决方案3】：

可能像 Olfan 所说的那样是您的防火墙，或者您可能需要在您的环境中使用代理。

【讨论】：

你能告诉我如何使用代理吗..在我的代码中.. 还有我如何设置我的防火墙设置以工作我的代码
有关代理的信息，请参阅 LWP::UserAgent 文档：search.cpan.org/perldoc?LWP::UserAgent 因为我不知道关于 Windows 的第一件事（更不用说您使用的是什么个人防火墙），所以我可以防火墙不能帮你。