如何在Perl的WWW :: Mechanize中使用Web代理？

Question

我正在嘗試與代理服務器一起使用WWW :: Mechanize，但似乎無法使它正常工作。 由於Mechanize是LWP :: UserAgent的子類，因此我一直在閱讀有關鏈接文本的代理內容

我有一個代理列表，例如：

74.87.151.157:8000  
69.171.152.25:3128  
190.253.82.253:8080 
189.11.196.221:3128 
41.234.205.201:8080

我不知道如何使用它們。

謝謝，

Answer 1

這個例子設置了一個HTTP代理：

my $mech  = WWW::Mechanize->new();
my $proxy = '74.87.151.157:8000';

$mech->proxy('http', "http://$proxy");