2013-05-14 146 views
2

我在perl中編寫了以下腳本以使用代理連接到網站。授予代理地址此時可能不起作用,但有條件的代理地址沒有問題,代碼工作正常。通過Perl中的代理服務器通過登錄/ Cookie連接到網站

我想知道如何將其擴展到一個網站,其中有一個cookie,並在其中我必須提供登錄。也就是說,在代碼中,我想使用:$ mech-> submit_form()。我的問題不是如何爲cookie和登錄(我已成功完成該操作)對$ mech進行編碼,而是如何通過代理地址執行此操作。我問,部分原因是我甚至不知道如何在網頁瀏覽器中做到這一點。

#!/usr/bin/perl 

use strict; 
use warnings; 
use utf8; 
use WWW::Mechanize; 
use WWW::Mechanize::Link; 
use LWP::UserAgent; 
use Data::Dumper; 

BEGIN { $| = 1 } 
$ENV{'HTTP_PROXY'} = 'http://66.35.68.145:7808'; 
$ENV{'HTTPS_PROXY'} = 'http://66.35.68.145:7808'; 

my $mech = WWW::Mechanize->new(); 
my $response = $mech->get("http://whatismyipaddress.com/"); 
print Dumper($response->decoded_content); 
+0

你讀過[的perldoc](http://search.cpan.org/~jesse/WWW-Mechanize-1.72/lib/WWW/Mechanize.pm )?那就是我要開始的地方。 – chrsblck

+0

我已經閱讀過perldoc,我很喜歡它的寫法。我的問題不在於如何編碼$ mech本身。正如我所說,我已經編碼它沒有代理工作。我不確定如何按照我編寫的腳本合併代理。我的問題的一部分是我不知道如何在瀏覽器中執行此操作。 – user1690130

回答