LWP::UserAgent::ProxyAny ======================== Extended LWP::UserAgent, which supports both HTTP_PROXY and IE proxy setting. INSTALLATION To install this module type the following: perl Makefile.PL make make test make install DEPENDENCIES This script requires these other modules and libraries: LWP Optional modules: Win32::TieRegistry SYNOPSIS use LWP::UserAgent::ProxyAny; my $ua = LWP::UserAgent::ProxyAny->new; $ua->env_proxy; # visit url with HTTP_PROXY or Win32 IE proxy settings my $response = $ua->get('http://sourceforge.net/projects/bookbot'); if ($response->is_success) { print $response->content; # or whatever } else { die $response->status_line; } # Or set proxy by specified name $ua->set_proxy_by_name("No"); # No Proxy $ua->set_proxy_by_name("Default"); # $ua->env_proxy $ua->set_proxy_by_name("127.0.0.1:8080"); # set proxy as http://127.0.0.1:8080 DESCRIPTION This class is an extended LWP UserAgent, which can support both traditional HTTP_PROXY settings and proxy settings of Microsoft Windows Internet Explorer. $ua->env_proxy Read proxy settings from HTTP_PROXY or CGI_HTTP_PROXY or win32 IE proxy settings. $ua->set_proxy_by_name($name) Set proxy settings from $name. $name = "No"; # No Proxy $name = "Default"; # $ua->env_proxy $name = "Others..."; # set proxy as http://Others... my $ie_proxy_server = $this->get_ie_proxy( $ie_proxy_no ) Return current IE proxy settings and set $ie_proxy_no as proxy override settings. NOTES ABOUT IIS When running under Microsoft IIS, ProxyAny will try to read IE proxy settings from current user's registry. Under default setting of IIS, the current user to anonymous browsering is IUSR_(hostname) or IWAM_(hostname), and ProxyAny will read registry from .DEFAULT users instead of from login user. So if you want to use ProxyAny under IIS, you'd better change your IIS anonymous browsering settings from IUSR_(hostname) to your login user name. 1. Open your IIS management interface. 2. Select your web site, and right click to define properties. 3. Go to "Directory Security" Tab, and click "edit" under Anonymous and Authentication groups. 4. Enable Anonymous and edit your anonymous accounts, change it from IUSR_(hostname) or IWAM_(hostname) to your user name. Thanks Rich Mellor for this notes. BUGS, REQUESTS, COMMENTS Please report any requests, suggestions or bugs via http://bookbot.sourceforge.net/ http://rt.cpan.org/NoAuth/ReportBug.html?Queue=LWP-UserAgent-ProxyAny SEE ALSO LWP::UserAgent COPYRIGHT AND LICENSE Copyright 2003-2004 Qing-Jie Zhou This library is free software; you can redistribute it and/or modify it under the same terms as Perl itself.