|
|
ru.cgi.perl- RU.CGI.PERL ------------------------------------------------------------------ From : Comoderator of RU.CGI.PERL 2:5020/371.32 15 Jan 2001 11:54:38 To : Sergey Novak Subject : Moderatorial [*] (Re: http) -------------------------------------------------------------------------------- В твоём письме от Fri, 05 Jan 2001 00:06:19 +0300 написано: SN> Привет All! SN> Вот такой кусок кода, который открывает соединение с удаленным хостом и SN> делает http запрос (в данном случае настроен на прокси). Это все идеально SN> работает и с web-сервером и с прокси на локальной машине (Linux). Hо, когда SN> только пытаюсь подключаться к соседней тачке, где прокси, веб сервер под SN> виндой, то в логах обнаруживаю попытку соединиться, но не приходит ни одного SN> байта запроса. И это при том, что все команды прекрасно проходят через SN> телнет (от того же юзера). SN> #!/usr/bin/perl SN> use IO::Socket; SN> $sock = new IO::Socket::INET (PeerAddr => '192.168.0.3', SN> PeerPort => 8080, SN> Proto => 'tcp', SN> ); SN> if (!$sock) SN> {print "Socket could not be created. Reason: $!\n\n"; SN> return;} SN> print $sock "GET http://linux/index.html HTTP/1.0\n\n"; SN> @a = <$sock>; SN> close ($sock); SN> print @a; SN> ЗЫЖ Какая команда посылается не имеет значение, потому что она до сервера SN> даже не доходит. Если я неправильно создаю сокеты, то почему все работает на SN> локальной машине? SN> ICQ: 21977876 [Team Жратва - рулез!] SN> Удачи тебе, All, в твоих мучениях! Оффтопик. В RU.PERL. -- FIDO: Artem Chuprina, 2:5020/371.32, comoderator of RU.CGI.PERL Internet: Artem Chuprina <cmrcp@ran.pp.ru>, comoderator of fido7.ru.cgi.perl --- slrn/0.9.6.3-as (Linux) * Origin: AKA с подствольным плюсомётом (2:5020/371.32) Вернуться к списку тем, сортированных по: возрастание даты уменьшение даты тема автор
Архивное /ru.cgi.perl/725250b02fc9d.html, оценка из 5, голосов 10
|