Hi Jack,
I've done something like following code snip and it works fine for me. Hope
it'll help:
---------------------------8<------------------------------------
my $myUserAgent = LWP::UserAgent->new(keep_active => 2);
$myUserAgent->agent("Mozilla/4.0 (compatible; MSIE 6.0; Win32)");
$myUserAgent->cookie_jar(HTTP::Cookies->new(autosave => 1));
# download login form
.....
# parse and fill out form data
my $LoginForm = HTML::Form->parse($myResponse->content,
$myResponse->base());
$LoginForm ->value('username' => $username);
$LoginForm ->value('password' => $password);
....
# submit form
$myResponse = $myUserAgent->request($myForm->click() );
# Get the page you want if login was sucess.
my $myResponse = $myUserAgent->request(HTTP::Request->new($Verb, $PageURL));
---------------------------8<------------------------------------
Regards,
WWang
