2011-04-27 2 views
0

У меня проблема с использованием WWW :: Mechanize. Кажется, что независимо от того, какой веб-сайт я пытаюсь получить, мой скрипт просто сидит там в командной строке, пока он не истечет. Единственное, что может быть уместно, это следующее:WWW :: Механизировать таймаут - все тайм-ауты URL-адресов

  • У меня установлен IE7, хром и FF. FF был моим браузером по умолчанию, но я недавно переключил его на хром.
  • Я, кажется, могу получить доступ к веб-сайтам с портом 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;

ответ

1

код, кажется, работает, поэтому он должен быть брандмауэр/прокси вопрос. Вы можете попробовать установить прокси-сервер:

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