yes, it is the correct page i check with print $mech->content();use WWW::Mechanize; use Storable; use LWP; use warnings; my $loginpage = "http://www.homepage.org"; my $challenge = "http://www.homepage.org/test.htm"; my $username = 'username'; my $password = 'password'; my $mech = WWW::Mechanize->new(); $mech -> cookie_jar(HTTP::Cookies->new()); $mech -> get($loginpage); $mech -> form_name('loginform'); $mech -> field ('username' => $username); $mech -> field ('password' => $password); $mech -> click ('btn_submit'); #navigate to challenge page $mech->get( $challenge ); my @find_text = $mech->find_all_inputs( type => 'text' ); for $boxes (@find_text) { #if (length($boxes->value) > 100) { print $boxes->value(); # } }
In reply to Re^4: WWW::Mechanize problem
by Anonymous Monk
in thread WWW::Mechanize problem
by Anonymous Monk
| For: | Use: | ||
| & | & | ||
| < | < | ||
| > | > | ||
| [ | [ | ||
| ] | ] |