my $mech = WWW::Mechanize->new();
$mech->cookie_jar(HTTP::Cookies->new());
$mech->get($url);

    $mech->set_visible( $user, $pass );
    $mech->submit();