Comment faire pour utiliser un proxy web avec WWW :: Mechanize de Perl?

Question

J'essaie d'utiliser WWW :: Mechanize avec un serveur proxy, mais il semble que je ne peux pas le faire fonctionner. Depuis Mechanize est une sous-classe de LWP :: UserAgent, j'ai lu la chose proxy sur link text

J'ai une liste de procurations, par exemple:

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 

Je ne sais pas comment pour les utiliser.

Merci,

Answer 1

Cet exemple définit un proxy HTTP:

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

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