Re: пара отвлеченных вопросов, офтопик

["Dmitry E. Oboukhov" <dimka@avanto.org>]

> > я нигде не нашел ответа на вопрос можно ли с сокетами в перл работать
> > как с файлами?
> 
> Да.
> 
> > а вот в смысле записи в сокет экспериментально попробовал - не работает
> > print $socket "бла-бла";
> 
> Что значит не работает? Как проверяли?
> 
> Может быть не хватает use IO::Handle;
> $socket->autoflush(1);

my $socket;
socket($socket, PF_INET, SOCK_STREAM, getprotobyname('tcp'));
connect($socket, sockaddr_in(80, inet_aton("127.0.0.1")));
print $socket "GET / HTTP/1.0\n\n";
print while(<$socket>);

почему-то висит и ответа сервера не печатает

а вот если 
print $socket "GET / HTTP/1.0\n\n";

заменить на send то работает так как предполагалось.

вот отсюда и возник вопрос.

> Может быть не хватает use IO::Handle;
гхм?