Re: using proxy servers with lwp::simple or useragent

[sulfericacid]

If you'd have done a search, I think you'd have found exactly what you were looking for. Take a look at LWP::Simple setting a proxy.

If your proxies don't require authentication, this should work

$ENV{HTTP_proxy}="http://proxy.company.com:80";

All you'd have to do is prepare your list in the array and loop over it while doing all the fun stuff inside.

Hope this helps.

[Anonymous Monk]

that's exactly what i was looking for!!! thanks man

[Anonymous Monk]

Actually with more testing it didn't work. Maybe it's working but I don't understand? Should this be hitting my web site under a new IP address every time?

use strict;
use warnings;

use LWP::Simple;

my @list = qw(211.202.1.52:80 61.139.87.132:80 72.13.246.65:3128 203.1
+15.10.11:80 203.115.10.38:80);

foreach my $prox (@list)
{
   $ENV{HTTP_proxy}= $prox;
   my $url = "www.sensationalscentsonline.com";
   print "$prox attempted..\n";
}

[merlyn]

LWP::Simple grabs the env proxy setting only the first time it is used. After that, you've got to reach in to the $ua to change things. See my other code.