bobf has asked for the wisdom of the Perl Monks concerning the following question:
I finally had an occasion to try out WWW::Mechanize, so I eagerly read the docs and started coding. I am somewhat embarassed to admit that I got stuck almost immediately. I am trying to log in, but I can't figure out how to post the form once I've filled it in because the submit button is in a table and it is unnamed.
The source HTML for this form is as follows:
<form method="POST" id="loginForm" action="https://www.pharmgkb.org/cas/login? service=http%3A%2F%2Fpreview.pharmgkb.org%2F views%2Findex.jsp%3Fid%3Dhome.welcome" /> <table border="0" cellpadding="4" cellspacing="0"> <tr> <th align="right">Username:</th> <td align="left"><input type="text" name="username" tabindex="1" /></td> <td rowspan="2"> <a href="/mypharmgkb/profile/accountReminder.action"> Forgot your User ID and/or password?</a></td> </tr><tr> <th align="right">Password:</th> <td align="left"><input type="password" name="password" tabindex="2" /></td> </tr><tr> <td align="right"> </td> <td align="left" colspan="3"><input type="submit" value="Sign In" tabindex="3" /> <input type="reset" tabindex="4" /></td> <td> </td> </tr> </table> </form>
This form is the second form on the page. I confirmed that I had the correct form by doing:
Here is the relevant part of my code (meager, I know):print Dumper( $mech_obj->current_form() );
use strict; use warnings; use WWW::Mechanize; use HTTP::Cookies; my $mech_obj = WWW::Mechanize->new(); $mech_obj->get( $signin_url ); if( not $mech_obj->success() ) { print "Could not retrieve signin page:\n"; print $mech_obj->content(); die; } $mech_obj->form_number( 2 ); $mech_obj->set_fields( 'username' => $username, 'password' => $password );
I've tried to submit the form using the submit method, but it seems the first form on the page (a website search box) is submitted instead of the login form. I also tried using the click method, but I can't figure out what the name of the button is (using click without specifying the button name also submits the search box instead of the login form).
Since the button is in a table and doesn't appear to have a name, I thought using the optional arguments (x, y coordinates for the button) with the click method, but 1) the name of the button still appears to be required, and 2) I don't know how to determine the button coordinates on the page.
I Googled the net and Super Searched the Monastery's archives, but came up empty. Any ideas?
Thanks in advance!
|
---|
Replies are listed 'Best First'. | |
---|---|
Re: Clicking nameless buttons with WWW::Mechanize
by tphyahoo (Vicar) on Mar 15, 2005 at 12:24 UTC | |
by bobf (Monsignor) on Mar 15, 2005 at 15:08 UTC | |
by tphyahoo (Vicar) on Mar 15, 2005 at 15:20 UTC | |
Re: Clicking nameless buttons with WWW::Mechanize
by jbrugger (Parson) on Mar 15, 2005 at 05:12 UTC | |
by bobf (Monsignor) on Mar 15, 2005 at 05:45 UTC | |
Re: Clicking nameless buttons with WWW::Mechanize
by PodMaster (Abbot) on Mar 15, 2005 at 07:38 UTC | |
Re: Clicking nameless buttons with WWW::Mechanize
by Cody Pendant (Prior) on Mar 15, 2005 at 10:03 UTC | |
Re: Clicking nameless buttons with WWW::Mechanize
by mdillon (Priest) on Mar 15, 2005 at 06:16 UTC |