運行Perl腳本通過DOS命令提示符調用網頁？

Question

我的工作場所使用XP，我試圖在其上運行下面的腳本

use strict; 
use warnings; 

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

$mech->get('http://google.com'); 

$mech->submit_form(
    form_number => 0, 
    fields  => { 
     q  => 'led zeppelin', 
    } 
); 

print $mech->content; 

然而，當我嘗試運行通過DOS腳本，我總是得到一個錯誤信息說，該頁面無法加載，因爲由於超時，我的電腦無法連接到google.com:80。

據我所知，這不是一個互聯網問題，因爲我的瀏覽器似乎運行良好。我想知道的是，是否還有其他權限或參數需要設置，以便網站可以加載？如果不是，問題是什麼？

Answer 1

也許互聯網只能通過工作場所的代理服務器訪問，這是一種常見的做法。

$mech->proxy(['http', 'ftp'], 'http://proxy.example.com:8000/'); 

請參閱How do I use WWW::Mechanize through a proxy server? in WWW::Mechanize::FAQ。