On Friday 14 April 2006 23:24, Alan_C wrote: > On Friday 14 April 2006 14:36, siegfried wrote: [ . . ] > > How do I modify the above fragment so I can conditionally use a proxy?
http://www.google.com/search?q=perl+lwp+proxy&start=0&ie=utf-8&oe=utf-8&client=firefox-a&rls=org.mozilla:en-US:official http://tomacorp.com/perl/lwp.html http://search.cpan.org/~gaas/libwww-perl-5.805/lwpcook.pod#PROXIES http://search.cpan.org/~gaas/libwww-perl-5.805/lib/LWP/UserAgent.pm#Proxy_attributes I forgot until now -- but LWP::UserAgent::ProxyAny I'm guessing is a class underneath LWP::UserAgent Thus, (how they are) as to some of the examples as/like at above url(s). print "N \n"; # $ua->no_proxy(qw(no se fi)); # (I guess) } else { print "Y \n"; # change ftp to http for http (I guess) # $ua->proxy(ftp => 'http://proxy.myorg.com'); } -- Alan. -- To unsubscribe, e-mail: [EMAIL PROTECTED] For additional commands, e-mail: [EMAIL PROTECTED] <http://learn.perl.org/> <http://learn.perl.org/first-response>
