Hi! I am trying to use Mechanize to fill a web page but i Cant. Just it doesnt anything. My script is this:
It is so simple but it doesnt wotk.! Really, I dont know becasue all examples that I have seen are equals. use WWW::Mechanize; my $mech = WWW::Mechanize->new(); $username='equijada'; $password='Jaws Una test'; $url='http://litio/pruebaparago/index3.php'; $is=$mech->get( $url ); $mech->form_name('form1'); $mech->field(usuario => $username); $mech->field(clave => $password); $mech->click_button(value => 'save'); $mech->dump_forms( ); print $mech->uri()."\n"; print "Passed 1st login ...\n"; #--------------------------- El dump gave me this C:\Perl\scripts>perl test_mechanize.pl 0POST http://litio/pruebaparago/index3.php (multipart/form-data) [form1] usuario= (text) clave= (text) Submit=Submit (submit) save=save (submit) cancel=cancel (submit) http://litio/pruebaparago/index3.php Passed 1st login ... Any help ? I am worrking in windows with ActivatePerl but I tested in linux too with same results. -- To unsubscribe, e-mail: [EMAIL PROTECTED] For additional commands, e-mail: [EMAIL PROTECTED] http://learn.perl.org/
