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

Question

我想使用WWW :: Mechanize與代理服務器，但似乎我不能得到它的工作。 由於機械化是LWP ::用戶代理的子類，我一直在閱讀有關代理的事情一遍 link text

我代理的列表，例如：

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");