|
ru.perl- RU.PERL ---------------------------------------------------------------------- From : Andrey Sapozhnikov 2:5020/400 08 Jan 2002 17:34:59 To : maxim lapkovskij Subject : Re: inetd --------------------------------------------------------------------------------
maxim lapkovskij wrote:
> Короче прописываю в /etc/inetd.conf
> ------------------------------------------
> myservice stream tcp nowait nobody /bin/service.pl /bin/service.pl
> ------------------------------------------
> Вопрос: как узнать из программы на перле с какого IP произошло соединение ?
Читай: perldoc -f getpeername. Сокетом в твоем случае является STDIN.
Андрей
--- ifmail v.2.15dev5
* Origin: Demos online service (2:5020/400)
Вернуться к списку тем, сортированных по: возрастание даты уменьшение даты тема автор
Архивное /ru.perl/5284bc5bf876.html, оценка из 5, голосов 10
|