Тема: php md5 ???
Показать сообщение отдельно
Старый 18.12.2004, 14:48     # 6
bdimych
Junior Member
 
Регистрация: 03.06.2002
Сообщения: 68

bdimych Путь к славе только начался
Вы не правы (или я :-)

Content-Type:... это уже ответ. В файле записан сначала весь запрос потом \n\n\n потом весь ответ

Ну вот код весь на perl
Код:
use LWP::UserAgent;
use HTTP::Request::Common;

$Url = 'http://xxxxxxxxxxxxxxxxx';

$UsAg = new LWP::UserAgent;
$UsAg->agent('Mozilla/4.0 (compatible; MSIE 5.5; Windows 98; AIRF)');
$Resp = $UsAg->request(POST $Url,
	'Accept-Language' => 'ru',
	Content => [x => 'привет']);
open D, '>1-1.txt'; binmode D; print D $Resp->request->as_string . "\n\n\n" . $Resp->as_string; close D;

$UsAg = new LWP::UserAgent;
$Resp = $UsAg->request(POST $Url,
	'Accept-Language' => 'ru',
	Content => [x => 'привет']);
open D, '>1-2.txt'; binmode D; print D $Resp->request->as_string . "\n\n\n" . $Resp->as_string; close D;
bdimych вне форума