use Win32::IE::Mechanize;
#other code, url, user, password etc.
my $agent = Win32::IE::Mechanize->new(visible=>1);
$agent->credentials($url,$user,$pass);
$agent->get($url);