Select Code to Download

use WWW::Mechanize;
    my $m = WWW::Mechanize->new( autocheck => 1 );
...
                },
               button    => 'Sign In',
     );

use WWW::Mechanize;
use HTTP::Cookies;
...
print "form submit failed!", $mech->response->status_line, "\n" unless
+ $mech->success;
$mech->set_visible( $username );
$mech->click_button(value => "Sign In");

use WWW::Mechanize;
use URI::URL;
...
        $password="shekar";
        $m->set_visible($username,$password);
        $m->submit();