В общем ситауция такая. Делаю POST запрос чтоб авторизоваться, поступает ответ с редиректом на нужную страницу. Так же в ответ приплывает три кукиса. После авторизации, я могу нормально смотреть что мне надо, но сохранить кукисы не получается, те сохраняются не все и из-за этого каждый раз надо вводить пароли. Вот что у меня в наличии:
my $ua = LWP::UserAgent->new;
my $cookie = HTTP::Cookies->new(
file => "$ENV{HOME}/.cookie",
autosave => 1
);
$ua->cookie_jar($cookie);
push @{ $ua->requests_redirectable }, 'POST';
unless($ua->request(GET $url)) {
my ($user, $pass) = get_account_info();
my $resp = $ua->request(POST $form_url, [username=>$user, password=>$pass]);
carp "error: ", $resp->status_line, $/ unless $resp->is_success;
}
примерно так.
Вопрос я думаю уже понятен. Что нужно сделать чтоб кукисы сохранялись ?
Пасибки
Вы не можете добавлять комментарии в эту тему. Тема перемещена в архив.
Похожие темы
- Форум Хорошая документация c примерами по LWP::UserAgent (2006)
- Форум объясните идиоту, отчего не подгружает. с веба же вручную подгружает (2006)
- Форум Почему не работает прокси (закомментировал)? (2008)
- Форум Perl, LWP (2010)
- Форум perl LWP (2008)
- Форум OpenVPN & Ldap (2012)
- Форум Щель хавает лишнего? (2020)
- Форум Не работает LWP (2006)
- Форум Perl, LWP, default_headers (2005)
- Форум Проблемы с LWP (2004)