in reply to WWW::Mechanize click_button
...etc etcuse Win32::IE::Mechanize; my $mech = Win32::IE::Mechanize->new(visible => 1); # Connect to server $mech->get( "http://web_server:8080" ); $mech->success or die $mech->response->status_line; my $html = $mech->content; # Log into server $mech->form_name("loginform"); $mech->field('userName', 'courtenay@db.com'); $mech->field('loginPassword', ''); $mech->click_button( value => ' Login ' ); $html = $mech->content;
|
|---|