Beefy Boxes and Bandwidth Generously Provided by pair Networks
more useful options
 
PerlMonks  

button not clickable with WWW::Mechanize

by ZlR (Chaplain)
on Mar 17, 2006 at 14:15 UTC ( #537457=perlquestion: print w/ replies, xml ) Need Help??
ZlR has asked for the wisdom of the Perl Monks concerning the following question:

Hello Monks,

I'm sorry as this must be a very basic problem :| The form i open has multiple buttons, the html source looks like this :

<FORM class="form_fonce" ACTION="/app-html/general/action.htm" NAME="f +orm_machine" TARGET="indic_machine" OnSubmit="return saisie_indic(document.form_machine.machine.value);"> Votre recherche : <INPUT TYPE="text" NAME="machine" SIZE="8" VALUE="" OnChange="return saisie_machine(document.form_machine.machine.value);" +> <INPUT TYPE=hidden NAME="FILTRE" VALUE="*"> <INPUT TYPE=hidden NAME="Filtre_machine" VALUE="*"> <INPUT TYPE=hidden NAME="Filtre_Os" VALUE="*"> <INPUT TYPE="button" NAME="assistance" VALUE="Assist +ance ..." OnClick="return saisie_assistance();"> <INPUT TYPE="button" NAME="IwantThisOne" VALUE="Iwant +ThisOne" OnClick="return saisie_IwantThisOne(document.form_machine.machine.valu +e);"> <INPUT TYPE="button" NAME="foobarbaz" VALUE="Foobarb +az" OnClick="return saisie_foobar(document.form_machine.machine.value);"> <INPUT TYPE="button" NAME="info" VALUE="Info" OnClick="return saisie_infos(document.form_machine.machine.value);"> <INPUT TYPE="button" NAME="decl" VALUE="Coll" OnClick="return coll(document.form_machine.machine.value); "> </FORM>
Here's what i try to do :
my $url = 'http:/app/correct/path/form_machine.htm' ; my $mech = WWW::Mechanize->new(); $mech->get( $url ) ; my $machine = 'SYSID' ; $mech->form_name('form_machine') ; $mech->field( 'machine', $machine ) ; $mech -> click('IwantThisOne') ;
And it fails with
No clickable input with name IwantThisOne
There is no typo in the name i use in real life. I tried with click_button and got the same error .

What is wrong ? Is it a problem with the OnClick stuff ?

Thanks if you can shed some light on this ...

Comment on button not clickable with WWW::Mechanize
Select or Download Code
Re: button not clickable with WWW::Mechanize
by Joost (Canon) on Mar 17, 2006 at 14:44 UTC
      hmm ... I tried :
      $ie->form_name('form_machine') ; $ie->field( 'machine', $machine ) ; $ie -> click('IWantThisOne') ;

      This has the effect of oppening an IE window with the page i want ! And that's with visible => 0 at the creation of the IE object ?! With visible => 1 it doesn't open the correct page ...

      I'll bypass the problem by attacking the URL directly but it's a little bit disappointing ...

Log In?
Username:
Password:

What's my password?
Create A New User
Node Status?
node history
Node Type: perlquestion [id://537457]
Approved by Corion
help
Chatterbox?
and the web crawler heard nothing...

How do I use this? | Other CB clients
Other Users?
Others surveying the Monastery: (6)
As of 2014-11-27 07:03 GMT
Sections?
Information?
Find Nodes?
Leftovers?
    Voting Booth?

    My preferred Perl binaries come from:














    Results (180 votes), past polls