Re^9: javascript login

[aitap]

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.

[Anonymous Monk]

Or just $mech->dump_forms;

[robertw]

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"] );

[robertw]

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?