Форум программистов
 

Восстановите пароль или Зарегистрируйтесь на форуме, о проблемах и с заказом рекламы пишите сюда - alarforum@yandex.ru, проверяйте папку спам!

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

Восстановить пароль

Купить рекламу на форуме - 42 тыс руб за месяц

Ответ
 
Опции темы Поиск в этой теме
Старый 07.02.2019, 08: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, 20: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 в 20:18.
netbot вне форума Ответить с цитированием
Старый 25.04.2019, 11:25   #3
Tachyon1
Новичок
Джуниор
 
Регистрация: 07.02.2019
Сообщений: 2
По умолчанию

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

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


Купить рекламу на форуме - 42 тыс руб за месяц



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