Beefy Boxes and Bandwidth Generously Provided by pair Networks
Clear questions and runnable code
get the best and fastest answer

WWW Mechanize!!!

by lpanokarren (Novice)
on Sep 29, 2013 at 05:34 UTC ( #1056183=perlquestion: print w/ replies, xml ) Need Help??
lpanokarren has asked for the wisdom of the Perl Monks concerning the following question:

I apologize for asking to be hand held - but I did read up the FAQs, and also have been trying this myself for several hours - but cant figure out why my perl script isnt even moving to the next page - I am giving the right credentials to the web page - not sure - what is wrong -

If you could please take a look and share anything that jumps out, I would sincerely appreciate it!!!!!

#!/usr/bin/perl -w use strict; use WWW::Mechanize; use HTML::TokeParser; use HTML::TreeBuilder; my $agent = WWW::Mechanize->new(); $agent->get(""); $agent->form_id('form1'); $agent->field('ctl00$ContentPlaceHolder1$txtUname','******' ); $agent->field('ctl00$ContentPlaceHolder1$txtPwd', '******' ); $agent->click('ctl00$ContentPlaceHolder1$btn_Login'); print "\n" . $agent->success(); print $agent->status() . "\n"; #print $agent->content_type() . "\n"; #print $agent->title() . "\n"; print $agent->uri() . "\n"; $agent->form_id( 'form1' ); my $stream = HTML::TokeParser->new(\$agent->{content}); print "\n" . $agent->uri();

My output looks like this - the HTTP status code is 200 suggesting it got an 'OK' response - but the uri reported before and after the click button is the same

Comment on WWW Mechanize!!!
Select or Download Code
Replies are listed 'Best First'.
Re: WWW Mechanize FAQ!!!
by Anonymous Monk on Sep 29, 2013 at 06:25 UTC

Log In?

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

How do I use this? | Other CB clients
Other Users?
Others chilling in the Monastery: (15)
As of 2015-08-31 18:59 GMT
Find Nodes?
    Voting Booth?

    The oldest computer book still on my shelves (or on my digital media) is ...

    Results (361 votes), past polls