Perl WWW :: Механизация и аутентификация прокси

Question

У меня есть прокси с IP, портом, логином и паролем. Можно ли использовать этот прокси с Perl's WWW :: Mechanize ?

Спасибо.

Answer 1

1. Я не уверен, что есть нативный способ, но вот обходной путь, который, как утверждается, работает:

   http://www.perlmonks.org/?node_id=269358

   Он основан на настройке $ENV{HTTP_PROXY} to "http://login:password@proxyserver", где логин и пароль должны быть в кодировке URI.

2. Кроме того, WWW :: Mechanize является подклассом LWP::UserAgent, и, как таковой,то, что работает в LWP, должно работать на Mechanize (пример из LWP Cookbook, раздел PROXIES )

   use LWP::UserAgent;
   $ua = LWP::UserAgent->new;  
   $ua->proxy(['http', 'ftp'] => 'http://username:password@proxy.myorg.com');
   $req = HTTP::Request->new('GET',"http://www.perl.com");
   $res = $ua->request($req);  
   print $res->decoded_content if $res->is_success;