Hello All,
I am trying to connect to the Wells Fargo online bank using the LWP and open
SSL modules and am having trouble getting past the Authenticating User
screen. I was hopeing for a way to have the LWP useragent follow the
refreash meta tag the same way it does for a redirect. Does anyone know of a
way to accomplish this? Can anyone help me with this?
Thanks
Ron
here is the script:
#!/usr/bin/perl -w
use HTTP::Request::Common;
use HTML::Form;
use LWP::UserAgent;
use HTTP::Response;
#use LWP::Debug qw(+);
BEGIN {
local $^W = 0;
*LWP::UserAgent::redirect_ok = sub {1}
}
use HTTP::Cookies;
use strict;
my $ua = LWP::UserAgent->new;
$ua->cookie_jar(
HTTP::Cookies->new(
autosave => 1 )
);
my $savefile = 'c:/temp/checkingpage.txt';
$ua->agent('Mozilla/4.73');
my $req = $ua->request( POST 'https://banking.wellsfargo.com' );
my $form = HTML::Form->parse( $req->content, $req->base());
$form->value( 'userid', "$ARGV[0]" );
$form->value( 'password', "$ARGV[1]" );
$req = $ua->request( $form->click('Account Summary') );
print $req->as_string;
here is the output of the script:
HTTP/1.1 200 OK
Date: Fri, 01 Jun 2001 13:52:48 GMT
Pragma: no-cache
Server: Netscape-Enterprise/3.6 SP2
Content-Type: text/html
Expires: Mon, 01 Jan 1990 00:00:00 GMT
Client-Date: Fri, 01 Jun 2001 13:54:17 GMT
Client-Peer: 159.37.31.144:443
Client-SSL-Cert-Issuer: /O=VeriSign Trust Network/OU=VeriSign,
Inc./OU=VeriSign International Server CA - Class 3/OU=www
.verisign.com/CPS Incorp.by Ref. LIABILITY LTD.(c)97 VeriSign
Client-SSL-Cert-Subject: /C=US/ST=California/L=San Francisco/O=Wells Fargo
and Company/OU=ISG/CN=mn1-gx6-ib.banking.well
sfargo.com
Client-SSL-Cipher: RC4-MD5
Client-SSL-Warning: Peer certificate not verified
Refresh: 1;
URL=https://mn1-gx6-ib.banking.wellsfargo.com/cgi-bin/session.cgi?sessargs=e
352150ca8c828ab136853e921c6cb9cf
84ede2a096bdeaa435e2fc9a99168d2
Title: Authenticating User
<HEAD>
<TITLE> Authenticating User </TITLE>
[snipped]
