Perl WWW::Mechanize submit_form()

может в куках дело?
<code=Perl>
my $mech = WWW::Mechanize->new();
$mech->cookie_jar(HTTP::Cookies->new());
$mech->get($url);
$mech->form_id('login_form');
$mech->field(User => $username);
$mech->field(Pass => $password);
$mech->click();
</code>

Проверил на еще 1 удаленном сервере. Там все работает.
Посмотрел на diff между возвращаемыми HTML-страницами: там, где работает, стоит <?xml version=«1.0» encoding=«utf-8»?>, а где не работает - просто <?xml version=«1.0»?>. Я так понимаю, что возвращаемый код зависит от Request'а, который был отправлен серверу. Как узнать, какие запросы отправляет Mechanize? Как заставить его всегда просить все в UTF-8? Откуда он берет такие значения флагов?

А я как раз и прохожу авторизацию, чтобы потом сохранить куку :)

mech-dump --headers на рабочем сервере выдает «Content-Type: application/xhtml+xml; charset=utf-8», а на том, где не работает - ругается "https://.... returns type «application/xhtml+xml», not «text/html»"

Как заставить его всегда просить

$mech->add_header( Encoding =>'UTF-8' bla-bla

там похоже сервер криво настроен?

Не, ошибка была в Mechanize. Обновил до последней версии - перестало.

бывает ;)
на такой случай надо проверять другими инструментами, например curl, что-то типа:
curl -s --cookie cookies.txt --cookie-jar cookies.txt --data «login_form[login]=xxx&login_form[password]=xxx&submit=commit» https://bla-bla

Вся идеология пёрла ведёт к наплевательскому отношению к качеству кода. Встречал множество кривых перловых библиотек с cpan. Стоит ли использовать пёрл в 21 веке? Лучше оставить его в прошлом тысячелетии.

Для поставленной задачи ничего лучше не нашел. Перл - он и достаточно быстрый, и удобный.