Форум программистов
 
Контакты: о проблемах с регистрацией, почтой и по другим вопросам пишите сюда - alarforum@yandex.ru, проверяйте папку спам! Обязательно пройдите активизацию e-mail.

Вернуться   Форум программистов > Скриптовые языки программирования > Perl
Регистрация

Восстановить пароль
Повторная активизация e-mail

Здесь нужно купить рекламу за 25 тыс руб в месяц! ) пишите сюда - alarforum@yandex.ru

Ответ
 
Опции темы
Старый 07.02.2019, 09:53   #1
Tachyon1
Новичок
Джуниор
 
Регистрация: 07.02.2019
Сообщений: 2
По умолчанию cookie в LWP::UserAgent

Здравствуйте. Я уже прочитал на cpan.org описания HTTP::Cookie, но то ли лыжи не едут, то ли я чего-то не понял. Прошу помочь.

Есть хэш с несколькими парами имя-значение, который нужно оформить в виде куки, строка с данными формы и параметры для хедера (referer, useragent). Нужно собрать все это вместе и отправить методом POST.

С WWW::Curl это делается без проблем, но медленно. А вот приделать куки к запросу в LWP::UserAgent у меня так и не получилось, попробовал все примеры, которые увидел в гугле.

Пожалуйста, подскажите, как правильно использовать cookie_jar с LWP::UserAgent?
Tachyon1 вне форума   Ответить с цитированием
Старый 12.03.2019, 21:16   #2
netbot
Новичок
Джуниор
 
Регистрация: 12.03.2019
Сообщений: 2
По умолчанию

Код:
my $cookie=HTTP::Cookies->new(file => undef, autosave=>1, ignore_discard=>1, hide_cookie2=>0);
my $ua=new LWP::UserAgent( ssl_opts => { verify_hostname => 0, SSL_version => 'TLSv12' }, timeout=>30, agent=>'Mozilla/5.0 (Windows NT 6.3; rv:36.0) Gecko/20100101 Firefox/36.0', show_progress=>0 ); #TLSv12
$ua->cookie_jar($cookie);
$cookie->set_cookie(0, $key, $value, '/', 'site.ru', undef, 0,0,30000,0,());
my $resp=$ua->request(POST $url, [name1=>'value1', name2=>'value2']);

Последний раз редактировалось netbot; 12.03.2019 в 21:18.
netbot вне форума   Ответить с цитированием
Старый 25.04.2019, 12:25   #3
Tachyon1
Новичок
Джуниор
 
Регистрация: 07.02.2019
Сообщений: 2
По умолчанию

Спасибо. Почти заработало. Остался вопрос, как в запрос засунуть ДВЕ (или больше) пары куки ключ-значение?
Два последовательных вызова $cookie->set_cookie() не работают.
Tachyon1 вне форума   Ответить с цитированием
Старый 26.04.2019, 07:44   #4
netbot
Новичок
Джуниор
 
Регистрация: 12.03.2019
Сообщений: 2
По умолчанию

Цитата:
Сообщение от Tachyon1 Посмотреть сообщение
Два последовательных вызова $cookie->set_cookie() не работают.
Что именно «не работает»? Покажи результат неработания и код
netbot вне форума   Ответить с цитированием
Ответ

Опции темы

Ваши права в разделе
Вы не можете создавать новые темы
Вы не можете отвечать в темах
Вы не можете прикреплять вложения
Вы не можете редактировать свои сообщения

BB коды Вкл.
Смайлы Вкл.
[IMG] код Вкл.
HTML код Выкл.

Быстрый переход

Похожие темы
Тема Автор Раздел Ответов Последнее сообщение
Chromium, UserAgent и Socks lollollollol Работа с сетью в Delphi 5 12.12.2015 23:25
Синапс userAgent Зод Работа с сетью в Delphi 3 07.10.2011 16:25
PHP+curl+useragent pruf PHP 9 14.03.2011 18:07
Не меняется useragent Кинельски Работа с сетью в Delphi 0 17.02.2011 00:08
UserAgent в WebBrowser beemoto Работа с сетью в Delphi 1 19.07.2009 13:19


11:19.


Powered by vBulletin® Version 3.8.11
Copyright ©2000 - 2019, Jelsoft Enterprises Ltd.