Loki Гость
|
Добавлено: Пн Май 12 2003 11:34 Заголовок сообщения: Проблема с HTTP заголовком. PERL |
|
|
Здоровенки-булы любители Перловки. Появилась необходимость обратиться к Вам за советом.
Есть код:
$lurl = 'BLAH !!! BLAH !!! BLAH !!!'; $ua = new LWP::UserAgent; $ua->agent("Mozilla/4.0 (compatible; MSIE 6.0; Windows NT 5.1)"); $req_ = HTTP::Request->new(); $req_->protocol('HTTP/1.0'); $req_->method('GET'); $req_->header('Accept' => '*/*'); $req_->header('Accept-Language' => 'ru'); $req_->header('Cache-Control' => 'no-cache'); $req_->header('ACCEPT_ENCODING' => 'gzip, deflate'); >>>> $req_->header('CONNECTION' => 'Keep-Alive'); url(qq$lurl); $res = $ua->request($req_); if ($res->is_success) { print "Login:Ok\n"; print Z $res->as_string; } else { print "Login:Error\n".$res->as_string; } close (Z);
И вот header HTTP_CONNECTION который я Keep-Alive сделать хочу. Нифига не передаётся. Сниффер показывает, что в запросе только:
GET BLAH !!! HTTP/1.0 Cache-Control: no-cache Accept: */* Accept-Encoding: gzip, deflate Accept-Language: ru Host: BLAH !!! BLAH !!! BLAH !!! User-Agent: Mozilla/4.0 (compatible; MSIE 6.0; Windows NT 5.1)
А CONNECTION нету..браузер на тот-же сайт показывает: GET BLAH !!! HTTP/1.1 Accept: */* Referer: BLAH !!! Accept-Language: ru Accept-Encoding: gzip, deflate User-Agent: Mozilla/4.0 (compatible; MSIE 6.0; Windows NT 5.1) Host: BLAH !!! BLAH !!! BLAH !!! Connection: Keep-Alive Cache-Control: no-cache
И из браузера всё работает. Подскажите пожалуйста, как Коннекшен этот поставить-то. Зарание благодарен |
|