Версия для печати темы

Нажмите сюда для просмотра этой темы в обычном формате

Форум программистов _ Perl программирование _ проблема с модулем соккет (перл)

Автор: zhito 10:07:2007, 18:21

такая вот програмка на перле:
use Socket;
socket(SERVER, SOL_SOCKET, SO_REUSEADDR,1);
$server_port = "8002";
$my_addr = SockAddr_in($server_port, INADDR_ANY);
bind(SERVER, $my_addr) or die "cant bind to port $server_port : $!\n";
listen(SERVER, SOMAXCONN) or die "cant listen to port $server_port : $!\n";
while (accept(CLIENT, SERVER)){

}
close(SERVER);

выдает такую ошибку:
Undefined subroutine &main::SockAddr_in called at server.bat line 19.

странно - модуль соккет то установлен с этой функцией.
или дело в чем то другом?

Автор: Vovochka 10:07:2007, 23:29

Документация в перле - великая вещь!
и там НЕТ (!!!) никакой функции SockAddr_in, а есть sockaddr_in.

А вообще надо отказваться от Socket и переходить на IO::Socket
Объектно-Ориентированный подход