Hi all
I am atempting to get a log in with post, I have loooked in the from and it
uses post, hence using the post to log in, Where I'm confused is when i
print the $response->content I get the orignal page back, but what I want to
do is log in. Idealy I want to get through this log in page and get on to
the next page, whch hapens to be a post page as well.

I'm using the doc (
http://lwp.interglacial.com/ch05_05.htm#perllwp-CHP-5-EX-3 ) as my base for
doing this.

any Ideas and help most appriceated.





     7 my $login_Name = "name";
      8 my $password_PassText = "secret";
      9
     10
     11 my $browser = LWP::UserAgent->new;
     12 my $response = $browser->post(
     13   'http://website/',
     14   [
     15         #name="login"
     16         'login'  => $login_Name,
     17         #name="password"
     18         'password' => $password_PassText,
     19
     20         #name="login" value="Log In"
     21
     22         'login' => "Log In"
     23   ],
     24 );
     25 die "Error: ", $response->status_line
     26  unless $response->is_success;
     27
     28 if($response) {
     29 print "got a responce";
     30 }
     31
     32 if ($response->is_success) {
     33       print $response->content;
     34   }
     35   else {
     36       print $response->status_line, "\n";
     37   }
     38
     39
     40
     41
     42
     43 exit;


Thanks
Pat

Reply via email to