Hello There,
I have being trying to get information from a web server. I manage to connect and get validated by the server's cgi script but when I what to get to the following pages I get "Access denied! Please Login now." or We were unable to process your request at this time.
my script looks like
============= start of code ========================
use HTTP: :Request: :Common qw(POST);
use LWP::UserAgent;
$ua = LWP::UserAgent->new;
my $req = POST 'http: // ###.###.###.###:8081/FTC30/WFT/webpage.cgi',
[parm1 => 'GTUIOP', parm2 => 'notarealpasswd'];
print $ua->request($req)->as_string;
my $content = POST 'http :// ###.###.###.###:8081/FTC30/WFT/gdgegegdgg.jhfskhfh_kshfkhfkfh',
[parm1 => 'GTUIOP', parm2 => 'notarealpasswd'];
print $ua->request($content)->as_string;
================ end of code =====================stuff hidden for security reasons====
The above does not work but when I do a simple request to the second url while I have a explorer open everything works fine. So I believe that it maybe the connection going down and I need to revalidate.
My question is How do I open a session, validate and keep it open while I get the rest of the pages I need?
Thanking you all in advance for your aid.
Best regards,
Jim Power
BT Ignite Remote Access Service
Implementation Engineering and Network Change Control,
telephone number +33 (0) 1 41 88 40 25
fax number +33 (0) 1 41 88 42 70
(A)bort, (R)etry, (T)ake down entire network?
