in reply to Re^2: Unable to log into secure website using LWP::UserAgent
in thread Unable to log into secure website using LWP::UserAgent
Hi TCM I am also facing the same issue my code is the below one I am getting authentication failed.
#!/usr/bin/perl use strict; use warnings; use LWP::UserAgent; use HTTP::Request::Common; use HTTP::Cookies; my $user=""; my $pass=""; my $url="http://news.bankofamerica.com/EOS/EosDispatcher"; # define user agent my $ua=LWP::UserAgent->new(); $ua->agent("USER/AGENT/IDENTIFICATION"); # make request my $request=HTTP::Request->new(GET=>$url) or die "request failed : $!" +; # authenticate $request->authorization_basic($user,$pass") or die "Authorisation fail +ed : $!"; # expect response my $response= $ua->request($request); print $response->content();
|
|---|