I'd like to write a script that will go to an https website, login with a username and password and then upload a file. So the first thing I'm trying to do is actually log into the site using LWP::UserAgent. I created the code below to accomplish this, but it doesn't actually login to the site. I can see that I get a "200 OK" response from "$response->status_line", and it appears that I am on the login page of the site (based on what I'm seeing from "$response->as_string"), but it never actually logs in. So it looks to me like I'm on the login page, but I'm not sure how to actually login. I've read the LWP::UserAgent manpage many times over (and also other links from that manpage), but it's just not sinking in to this thick skull of mine. Anyone mind helping me out with this next step?

#!/usr/bin/perl 

use strict;
use warnings;
use LWP::UserAgent; 
use Data::Dumper;

my $https_login = 'https://some.httpssite.com'; 

my $https_user = 'username'; 
my $https_pass = 'password';

my $ua = LWP::UserAgent->new(); 

$ua->protocols_allowed( [ 'https'] ); 

# login to https site
my $response = $ua->post($https_login, [ 'user' => 
"$https_user",'password' => "$https_pass" ] ); 

if ($response->is_error())  { 
  printf " %s\n", $response->status_line; 
  print "https request error!\n"; 
} else {
   printf " %s\n", $response->status_line; 
   print Dumper ($response->as_string); 
 }

[download]

In reply to Unable to log into secure website using LWP::UserAgent by TCM

Title:
Use:  <p> text here (a paragraph) </p>
and:  <code> code here </code>
to format your post, it's "PerlMonks-approved HTML":


  • Posts are HTML formatted. Put <p> </p> tags around your paragraphs. Put <code> </code> tags around your code and data!
  • Titles consisting of a single word are discouraged, and in most cases are disallowed outright.
  • Read Where should I post X? if you're not absolutely sure you're posting in the right place.
  • Please read these before you post! —
  • Posts may use any of the Perl Monks Approved HTML tags:
    a, abbr, b, big, blockquote, br, caption, center, col, colgroup, dd, del, details, div, dl, dt, em, font, h1, h2, h3, h4, h5, h6, hr, i, ins, li, ol, p, pre, readmore, small, span, spoiler, strike, strong, sub, summary, sup, table, tbody, td, tfoot, th, thead, tr, tt, u, ul, wbr
  • You may need to use entities for some characters, as follows. (Exception: Within code tags, you can put the characters literally.)
            For:     Use:
    & &amp;
    < &lt;
    > &gt;
    [ &#91;
    ] &#93;
  • Link using PerlMonks shortcuts! What shortcuts can I use for linking?
  • See Writeup Formatting Tips and other pages linked from there for more info.