Beefy Boxes and Bandwidth Generously Provided by pair Networks
Keep It Simple, Stupid
 
PerlMonks  

Re^9: javascript login

by aitap (Deacon)
on Aug 17, 2012 at 19:43 UTC ( #988082=note: print w/ replies, xml ) Need Help??


in reply to Re^8: javascript login
in thread javascript login

I put strict off and it gives no errors,
It is recommended to put it back on and declare variables properly.

then i ran it and it gave line 6 unknown agent 'firefox'
This is because there is no agent alias called "Firefox". Use known_agent_aliases() to get available names, for example:
$ perl -MWWW::Mechanize -E'say join ", ",WWW::Mechanize::known_agent_a +liases' Linux Konqueror, Linux Mozilla, Mac Mozilla, Mac Safari, Windows IE 6, + Windows Mozilla

and line 1900 of mechanize.pm says there is no form numbered 2
Try using Data::Dumper and forms() method to get the list of forms available for WWW::Mechanize.

Sorry if my advice was wrong.


Comment on Re^9: javascript login
Download Code
Re^10: javascript login
by Anonymous Monk on Aug 17, 2012 at 19:45 UTC
    Or just $mech->dump_forms;
      mechanize.pm gives an error because when i
      $mech->dump_forms( ["https://login.binck.nl/klanten/Login.aspx?ReturnU +rl=%2fklanten%2fdefault.aspx"] );
      Mechanize.pm:2128: Not a GLOB reference # print {$fh} $form->dump, "\n"; gives an error sub dump_forms { my $self = shift; my $fh = shift || \*STDOUT; for my $form ( $self->forms ) { print {$fh} $form->dump, "\n"; } return; }
       $mech->dump_forms( ["https://login.binck.nl/klanten/Login.aspx?ReturnUrl=%2fklanten%2fdefault.aspx"] );

        I solved the problem, I switched perl, system perl (mac) is outdated, i need to upgrade that one, now it gives me the response WWW::Mechanize=HASH(0x100970d08)->dump_forms( HTTP::Response=HASH(0x100b5b118) );

        What do I have to fill in in form number right now?

Log In?
Username:
Password:

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

How do I use this? | Other CB clients
Other Users?
Others romping around the Monastery: (16)
As of 2014-07-28 19:41 GMT
Sections?
Information?
Find Nodes?
Leftovers?
    Voting Booth?

    My favorite superfluous repetitious redundant duplicative phrase is:









    Results (207 votes), past polls