in reply to LWP and Site Logins

The following code fragment is something that works for me ..

use LWP::UserAgent; use HTTP::Cookies; use HTTP::Request::Common; { my $ua = LWP::UserAgent->new; $ua->cookie_jar( HTTP::Cookies->new ); my $webPage = "https://noii.nasdaqtrader.com/"; my $res; # Log in. { my $uri = URI->new($webSite); $uri->query_form( 'txtUserName' => $username, 'txtPassword' => $password ); $res = $ua->get($uri); die "Unable to log in: " . $res->status_line unless ( $res->status_line =~ /200 OK/ ); } # Continue with logged in page .. }

Also, note that a 302 is not really an error, it's more of an informational message. It means that the web server is re-directing you to another page.

Alex / talexb / Toronto

Life is short: get busy!

Replies are listed 'Best First'.
Re^2: LWP and Site Logins
by debiandude (Scribe) on Aug 04, 2004 at 18:27 UTC
    Hrm. When I try that is seems to give me a 400 error.
      Correction. It didn't work but for a different reason. I had a type from the first try. When I tried you method with the uri post it still prints out the main page when I do a print $res->content.

        Be sure you've had a look at the source code for the login web page and have the field names for the login fields set correctly. Alternatively, go with the suggestions to use WWW:Mechanize -- I haven't used it, but I hear it simplifies matters greatly.

        Alex / talexb / Toronto

        Life is short: get busy!