He just did. Though it sounds like you have a more complicated environment setup than adding in basic auth credentials is going to address. You might need some proxy magic if your authentication is really automatic outside of Mech. The problem isn't well enough defined to know what's going on though.
| [reply] |
The Problem is:
I can access a web page "http://eonet.level3.com" using IE, but when i try to access the same page using WWW::Mechanzie or LWP::UserAgent i am getting "401 Unauthorized" error.
I have given below the code is used and the output i got
The Code:
#!C:/Perl/bin/perl.exe
use LWP::Simple;
use LWP::UserAgent;
use HTTP::Request;
use HTTP::Response;
use HTML::LinkExtor;
my $URL= "http://eonet.level3.com/";
$browser = LWP::UserAgent->new();
$browser->timeout(10);
my $request = HTTP::Request->new(GET => $URL);
my $response = $browser->request($request);
if ($response->is_error()) {printf "%s\n", $response->status_line;}
$contents = $response->content();
#print $contents;
print $response->status_line(), "\n";
print $response->headers()->as_string();
Output when i run the program:
C:\Documents and Settings\g.venkatesan\Desktop>perl lwp_test.pl
401 Unauthorized
401 Unauthorized
Date: Mon, 06 Apr 2009 21:24:30 GMT
Server: Microsoft-IIS/6.0
WWW-Authenticate: Negotiate
WWW-Authenticate: NTLM
WWW-Authenticate: Basic realm="corp.global.level3.com"
Content-Length: 1656
Content-Type: text/html
Content-Type: text/html; charset=Windows-1252
Client-Date: Mon, 06 Apr 2009 21:24:31 GMT
Client-Peer: 10.1.131.202:80
Client-Response-Num: 1
Client-Warning: Unsupported authentication scheme 'ntlm'
Title: You are not authorized to view this page
X-Powered-By: ASP.NET
Thanks
| [reply] |