Forum Webscript.Ru
Программирование => Perl => Тема начата: Billi от 27 Февраля 2004, 15:33:12
-
Простейший скрипт
use IO::Socket;
print "Content-type: text/html\\n\\n";
print "Hello\\n";
$host = "www.litvinuke.hut.ru";
$doc = "/articles/perlhttp.htm";
$conn = IO::Socket::INET->new(Proto => "tcp",
PeerAddr => $host,
PeerPort => 80);
die "cant connect $host $!" if (!$conn);
$conn->autoflush(1);
print $conn "HEAD $doc HTTP/1.0\\n\\n";
while (<$conn>) { print; }
close $conn;
Выдает ошибку
.... No such file or directory at
в чем может быть проблема
perl perl5.005_03
на perl perl5.005_04
все ок
-
1) Вместо точек всю ошибку в студию.
2) замени $host = "www.litvinuke.hut.ru"; на $host = "litvinuke.hut.ru";
пока все
-
Вся ошибка выглядит следующим образом
cant connect http://www.litvinuke.hut.ru No such file or directory at
с litvinuke.hut.ru тоже самое
-
другой сервер поставь
-
:) ясли бы ла такая возможность (хостинг не мои)
-
Ты не понял.
Поствь, к примеру
$host = "webscript.ru";
и
print $conn "HEAD $doc HTTP/1.0\\n\\n";
замени на
print $conn "GET / HTTP/1.0\\n\\n";
О результатах доложиш.
-
с $host = "webscript.ru"; таже опера :(
в изменении запроса с мысла не вижу так как ошибка
при соединении (IO::Socket::INET->new)
-
ты можеш телнетом с этого сервера подключиться к 80 порту?
telnet webscript.ru 80
-
Я попробовал соеденится используя модуль
Socket соединение с webscript.ru прошло номально
Как запустить там телнет я незнаю
-
с хат.ру ты тоже сможеш соединиться.... только раза с 20 го...
-
нет с хат.ру соединие есть и твои сервероем есть, но если соединятся через обычные сокеты, используя модуть IO:Socket
нет соединения нис первым ни со вторым
-
Вставь в скрипте
print $IO::Socket::VERSION."\\n";
-
1.1603
-
Billi:
нет с хат.ру соединие есть и твои сервероем есть
Какое соединение есть? Подробнее.
А не запрещены ли у тебя на серверы исходящие запросы?
-
На счет запрета фаирвола нет точно (я же могу соединятся используя простые сокеты).
Возможны соединения если пользоватся обычными сокетами из
модуля Socket.pm
Нельзя соеденися используя модуль IO::Socket из пакета IO
-
У себя в модуле (1.27) я не вижу этого сообщения. Вероятно, придется обновлять модуль.
-
Выходит что так :(
Я бы на обычных сокетах все на писал но уних какието траблы
с тайм аутом
P.S.
Спасибо за помощь