Версия для печати темы
Нажмите сюда для просмотра этой темы в оригинальном формате
Форум программистов > Perl: разработка для Web > Cookies при использовании LWP::UserAgent


Автор: Fireball222 25.2.2004, 00:05
Вообщем такая проблема:
необходимо скриптом загрузить инфу с URL, однако при этом правильная инфа выдаётся только в том случае, если туда передаётся верный кукис( типа авторизация). Так вот вопрос: как это сделать с помощью LWP::UserAgent -а , я почитал ман, функции там для этого вроде есть, но как-то ничего не работает mad.gif

Может кто-нибудь уже сталкивался с такой проблемой, или ещё лучше, успешно решал её. Поможите рабочим примерчиком.
Заранее спасибо!

Автор: acp 25.2.2004, 00:33
Выдрал из своего старого исходника.

Код

use LWP::UserAgent;
use HTTP::Cookies;
my $Cookie = HTTP::Cookies->new();
my $UsrAgent = LWP::UserAgent->new(agent => 'Mozilla/4.0 (compatible; MSIE 5.01; Windows NT 5.0)');
$UsrAgent->cookie_jar($Cookie);

Powered by Invision Power Board (http://www.invisionboard.com)
© Invision Power Services (http://www.invisionpower.com)