WWW ::机械化超时 - 所有网址超时

Question

我遇到了使用WWW :: Mechanize的问题。看起来无论我尝试访问哪个网站，我的脚本都只是在命令提示符处坐在那里，直到超时。唯一想到的可能相关的事情如下：

• 我安装了IE7，chrome和FF。 FF是我的默认浏览器，但我最近将其切换为chrome。
• 我似乎能够访问端口8080的网站就好。
• 我最近尝试过使用饼干罐，但因为老实说，我不确定它是如何工作的。这可能已经实例化了一个变化。

下面是一个例子：

#!/usr/bin/perl -w 
use strict; 
use WWW::Mechanize; 

my $url = 'http://docstore.mik.ua/orelly/perl/learn/'; 

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

$mech->get($url); 

print $mech->content;

Answer 1

的代码似乎工作，所以它必须是一个防火墙/代理问题。您可以尝试设置代理：

$mech->proxy(['http', 'ftp'], 'http://your-proxy:8080/');