Perl使用代理时抛出连接错误机械化

问题描述：

我正尝试使用perl MECHANIZE模块下载网站中存在的pdf文件。当我在没有任何代理连接的情况下运行程序时，它工作正常。但是当我试图在使用代理连接的公司服务器上运行程序时，我得到了下面的错误。Perl使用代理时抛出连接错误机械化

错误：

Error GETing http://www.google.com : Can't connect to www.google.com:80 (10060) a t Download.pl line 20.

我不知道如果我需要在程序中添加任何代理细节或者是这个东西，我们公司防火墙阻止programatical请求到一个网站吗？我已经尝试了很多，但coudn't找出。请问你们谁能提出建议？

答

如果你使用某种LWP的相关模块，你可以设置下列shell变量

HTTP_PROXY = your.corp.proxy：your_proxy_port

你可以检查与telnet或与wget的连接

telnet www.google.com 80

与wget的

wget http://www.google.com

感谢您的回复。我正在使用Windows 7.我在Windows中安装了telnet客户端来检查连接。我无法连接，错误信息如下：“Connecting to www.google.com ...无法打开与主机的连接，端口80 ：连接失败” –

答

你需要指定你到$mech代理：

$mech->proxy(['http'], 'http://proxy_address:proxy_port/');