ANTICHAT — форум по информационной безопасности, OSINT и технологиям
ANTICHAT — русскоязычное сообщество по безопасности, OSINT и программированию.
Форум ранее работал на доменах antichat.ru, antichat.com и antichat.club,
и теперь снова доступен на новом адресе —
forum.antichat.xyz.
Форум восстановлен и продолжает развитие: доступны архивные темы, добавляются новые обсуждения и материалы.
⚠️ Старые аккаунты восстановить невозможно — необходимо зарегистрироваться заново.
 |
|
30.05.2008, 02:23
|
|
Banned
Регистрация: 15.07.2007
Сообщений: 39
Провел на форуме:
1122110
Репутация:
43
|
|
Сообщение от ZET36
Подскажите как отправить пост запрос через LWP::UserAgent с куками
?
use LWP;
use HTTP::Cookies;
use strict;
my $url='www.perl.com/login';
my $ua=LWP::UserAgent->new;
my $cookie_jar=HTTP::Cookies->new;
$ua->cookie_jar($cookie_jar);
my $req=$ua->post($url,
['username' => 'ZET36',
'password' => 'justanotherperlhacker',
]);
$cookie_jar->extract_cookies($req);
|
|
|
30.05.2008, 03:37
|
|
Участник форума
Регистрация: 08.10.2007
Сообщений: 259
Провел на форуме:
500748
Репутация:
137
|
|
спасибо t00th но когда я пытаюсь вывести ответ то выводит
скрипт запускал со своего компа , может я что не так сделал?
Код:
use LWP;
use HTTP::Cookies;
my $url='www.win.mail.ru/cgi-bin/auth';
my $ua=LWP::UserAgent->new;
my $cookie_jar=HTTP::Cookies->new;
$ua->cookie_jar($cookie_jar);
my $req=$ua->post($url,
[Login => 'login', Domain => 'mail.ru', Password => 'pass', Mpopl => '274219236']);
$cookie_jar->extract_cookies($req);
print $req->content;
$F = <STDIN>;
и я так не понял в какую переменную нужно прописывать куки (которые я хочу отправить с запросом) а сдесь помему приведён пример чтения куков после запроса
Последний раз редактировалось ZET36; 30.05.2008 в 04:02..
|
|
|
|
30.05.2008, 04:39
|
|
Members of Antichat - Level 5
Регистрация: 04.09.2005
Сообщений: 528
Провел на форуме:
6520559
Репутация:
2947
|
|
Сообщение от ZET36
Подскажите как отправить пост запрос через LWP::UserAgent с куками
http://search.cpan.org/~gaas/libwww-perl-5.812/lib/HTTP/Cookies.pm
use HTTP::Cookies;
$cookie_jar = HTTP::Cookies->new(
file => "$ENV{'HOME'}/lwp_cookies.dat',
autosave => 1,
);
use LWP;
my $browser = LWP::UserAgent->new;
$browser->cookie_jar($cookie_jar);
|
|
|
|
30.05.2008, 04:43
|
|
Members of Antichat - Level 5
Регистрация: 04.09.2005
Сообщений: 528
Провел на форуме:
6520559
Репутация:
2947
|
|
Сообщение от ZET36
спасибо t00th но когда я пытаюсь вывести ответ то выводит
скрипт запускал со своего компа , может я что не так сделал?
Код:
use LWP;
use HTTP::Cookies;
my $url='www.win.mail.ru/cgi-bin/auth';
my $ua=LWP::UserAgent->new;
my $cookie_jar=HTTP::Cookies->new;
$ua->cookie_jar($cookie_jar);
my $req=$ua->post($url,
[Login => 'login', Domain => 'mail.ru', Password => 'pass', Mpopl => '274219236']);
$cookie_jar->extract_cookies($req);
print $req->content;
$F = <STDIN>;
и я так не понял в какую переменную нужно прописывать куки (которые я хочу отправить с запросом) а сдесь помему приведён пример чтения куков после запроса
|
|
|
|
30.05.2008, 05:03
|
|
Участник форума
Регистрация: 08.10.2007
Сообщений: 259
Провел на форуме:
500748
Репутация:
137
|
|
slider спасибо теперь работает
|
|
|
|
30.05.2008, 05:12
|
|
Участник форума
Регистрация: 08.10.2007
Сообщений: 259
Провел на форуме:
500748
Репутация:
137
|
|
а вот в какую переменную прописывать куки ?( я хочу тправить пост запрос с куами . вот например)
Код:
POST http://mail.rambler.ru/script/auth.cgi HTTP/1.0
Accept: image/gif, image/x-xbitmap, image/jpeg, image/pjpeg, application/x-shockwave-flash, */*
Referer: http://www.rambler.ru/
Accept-Language: ru
Content-Type: application/x-www-form-urlencoded
Proxy-Connection: Keep-Alive
User-Agent: Mozilla/4.0 (compatible; MSIE 6.0; Windows NT 5.1; SV1; MRA 4.8 (build 01709))
Host: mail.rambler.ru
Content-Length: 41
Pragma: no-cache
Cookie: ruid=UH0LBmW3KkhuFgEAARCXgwB=
domain=rambler.ru&url=7&login=zz&passw=zz
куда ruid=UH0LBmW3KkhuFgEAARCXgwB= прописывать? |
|
|
|
30.05.2008, 11:17
|
|
Moderator - Level 7
Регистрация: 28.04.2007
Сообщений: 547
Провел на форуме:
5516499
Репутация:
3702
|
|
ZET36
Так они ж у тебя и так прописаны.
Код:
POST http://mail.rambler.ru/script/auth.cgi HTTP/1.0
Accept: image/gif, image/x-xbitmap, image/jpeg, image/pjpeg, application/x-shockwave-flash, */*
Referer: http://www.rambler.ru/
Accept-Language: ru
Content-Type: application/x-www-form-urlencoded
Proxy-Connection: Keep-Alive
User-Agent: Mozilla/4.0 (compatible; MSIE 6.0; Windows NT 5.1; SV1; MRA 4.8 (build 01709))
Host: mail.rambler.ru
Content-Length: 41
Pragma: no-cache
Cookie: ruid=UH0LBmW3KkhuFgEAARCXgwB=
domain=rambler.ru&url=7&login=zz&passw=zz
|
|
|
|
30.05.2008, 11:28
|
|
Участник форума
Регистрация: 08.10.2007
Сообщений: 259
Провел на форуме:
500748
Репутация:
137
|
|
Solide Snake это запрос из навископа, я хочу отправить точно такой же запрос через перл, куда в скрипт мне прописывать куки я спрашивал
|
|
|
|
30.05.2008, 11:39
|
|
Познавший АНТИЧАТ
Регистрация: 27.04.2007
Сообщений: 1,044
Провел на форуме:
3660186
Репутация:
905
|
|
ZET36
$cookie_jar->set_cookie( $version, $key, $val, $path, $domain, $port, $path_spec, $secure, $maxage, $discard, \%rest )
The set_cookie() method updates the state of the $cookie_jar. The $key, $val, $domain, $port and $path arguments are strings. The $path_spec, $secure, $discard arguments are boolean values. The $maxage value is a number indicating number of seconds that this cookie will live. A value <= 0 will delete this cookie. %rest defines various other attributes like "Comment" and "CommentURL".
|
|
|
|
30.05.2008, 13:42
|
|
Участник форума
Регистрация: 08.10.2007
Сообщений: 259
Провел на форуме:
500748
Репутация:
137
|
|
krypt3r хых прежде чем задать этот вопрос я гуглил и просмотрел кучу статей типо
http://cylib.iit.nau.edu.ua/Books/Prog/Perl/ActivePerl_Help/site/lib/HTTP/Cookies.html
но в английском я не очень силён, и при том не так хорошо знаю перл что бы разобраься в отрывках кода, поэтому и задал вопрос что бы посмотреть как это выглядит на примере
|
|
|
|
|
|
|
|
Здесь присутствуют: 6 (пользователей: 0 , гостей: 6)
|
|
|
|
Похожие темы
Линейный вид
