我在使用WWW :: Mechanize时遇到问题。似乎无论我尝试访问什么网站,我的脚本只是在命令提示符中坐在那里,直到它超时。我想到的唯一可能相关的事情如下:
以下是一个例子:
#!/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;
答案 0 :(得分:1)
代码似乎有效,因此它必须是防火墙/代理问题。您可以尝试设置代理:
$mech->proxy(['http', 'ftp'], 'http://your-proxy:8080/');