my $browser = WWW::Mechanize->new(
      stack_depth => 0,
      timeout => 130,
      autocheck => 1,
      cookie_jar  => {},
);
$browser->agent_alias('Windows IE 6');
$browser->add_header( Accept => "text/*" );

$browser->get($url);

$browser->form_number(1);
$browser->field('name', $login);
$browser->field('pass', $password);

$resp1 = $browser->submit();