Developing.ru

При попытке считать страничку с сайта я получаю ответ:
------------------------------------------------------------------------------
500 (Internal Server Error) Can't connect to http://www.site.com:80 (connect: Invalid argument)
Content-Type: text/plain
Client-Date: Sun, 04 Jul 2004 08:28:30 GMT
Client-Warning: Internal response

500 Can't connect to http://www.site.com:80 (connect: Invalid argument)
------------------------------------------------------------------------------
При этом тот же скрипт на двух других компьютерах отрабатывает
отлично. Другие сайты читаются везде нормально.
То есть что-то данному серверу не нравится.
Программа на Perl и используется модуль LWP:UserAgent.
Думал может они фильтруют IP (поскольку с двух других компьютеров получаю нормально ту же страничку), но доступ через прокси сервер
дает похожую ошибку (с интерпретацией ее самим прокси)
Кто-нибудь в курсе того чем может быть вызвана эта проблема ?

linesmaster, вероятнее всего криво написан твой скрипт.

Присер скрипта

#!/usr/bin/perl
print "Content-type: text/html\n\n";
use HTTP::Request;
use LWP::UserAgent;
$ua = new LWP::UserAgent;
$req = HTTP::Request->new(POST => 'http://www.business.dp.ua/cgi-bin/metbb ... action=add');
$req->content_type('application/x-www-form-urlencoded');
$req->content("cat='sale'&name='1'&text='2'&city='3'");
$res = $ua->request($req);
if ($res->is_success) {
print $res->content;
}
else{
print "bad luck this time ". $res->code;
}
exit;
--
Работает только на 1 сервере - другие - ERROR 500
Подставка реферов, браузеров, протоколов и т.п. не помагает. Мучуюсь второй месяц. ПОМЖИТЕ !!!

А сервера везде одинаковые? А то типа под виндой работает, а под никсом - нет.
А логи сервера посмотреть не пробовал?

UUU писал(а):А сервера везде одинаковые? А то типа под виндой работает, а под никсом - нет.
А логи сервера посмотреть не пробовал?

Везде Юниксы стоят. К логам не пускают. Надо так разбираться.

Тогда советую попинать админа, чтобы он тебе сказал, что в логах творится.
Раньше апач писал конкретную ошибку, сейчас все в логи...
А SSH или аналогичного доступа нет? Если есть - то просто прогу запусти :-)

UUU писал(а):Тогда советую попинать админа, чтобы он тебе сказал, что в логах творится.
Раньше апач писал конкретную ошибку, сейчас все в логи...
А SSH или аналогичного доступа нет? Если есть - то просто прогу запусти :-)

Кто ж мне SSH даст ? Может конкретное что-то есть. Типа в чем может быть ошибка, или лучше, как сделать что б работало

Блин, а не в этом ли проблема?
$req = HTTP::Request->new(POST => 'http://www.business.dp.ua/cgi-bin/metbb ... action=add');
$req->content_type('application/x-www-form-urlencoded');
$req->content("cat='sale'&name='1'&text='2'&city='3'");

Ты одновременно и гет и пост пытаешься. попробуй:

$req = HTTP::Request->new(POST => 'http://www.business.dp.ua/cgi-bin/metbbs/board2.cgi');
$req->content_type('application/x-www-form-urlencoded');
$req->content("action=add&cat='sale'&name='1'&text='2'&city='3'");

Или ставь отладку после каждой строки....

[quote="UUU"]Блин, а не в этом ли проблема?
$req = HTTP::Request->new(POST => 'http://www.business.dp.ua/cgi-bin/metbb ... action=add')]

Нет, не проходит. Пишет то же. А отладку - это как ?

Вставляй по очереди после каждой строчки
print "Эта строчка прошла!";
И смотри после какой вылетает.
А те, что ниже - лучше закоментарить :-)