David,
You need to change your environment variables for the operating system.
If you wanted to do it from within the script you could do something like this:
$ENV{HTTP_PROXY} = 'http://username:[EMAIL PROTECTED]:8080/'';
On 3/9/06, David TV <> wrote:
> Something keeps on failing... Here's the code:
>
> use strict;
> use Data::Dumper;
> use WWW::Mechanize;
> use File::Basename;
>
> my $http_proxy = 'http://55.6.1.145:8080/';
> my $http_proxy_pass = 'my_passwd';
> my $http_proxy_user = 'username';
>
> my $m = WWW::Mechanize -> new or die "...ugly...";
>
> $m -> get ("http://www.despair.com/indem.html";) or die "...ugly...";
>
> my @top_links = @{$m -> links};
>
> print Data::Dumper -> Dump ( [\$m], [qw(\$m)] );
>
> This dumps the html page returned from the proxy saying that it needs
> authentication (despite I populated both http username and password):
> ot says (in a short way): "Unable to complete request:Access denied
> due to authentication failure."
>
> - David
>
_______________________________________________
Perl-Win32-Users mailing list
Perl-Win32-Users@listserv.ActiveState.com
To unsubscribe: http://listserv.ActiveState.com/mailman/mysubs
