Общие > Веб-технологии

Как "повесить" Perl-скрипт на порт?

(1/2) > >>

macmaniak:
Народ, озаботил я себя такой проблемой. Есть некий скрипт, хочется чтобы он висел в памяти а-ля демон и слушал некий порт (мной указанный, 666, к примеру :-) На этот порт ему будет скидываться определенная инфа, другой прогой. Вопрос, как это все сделать... нашел пару примеров, но они не заработали... или это вобще не то что мне было нужно.
Даже толком не могу понять как составить грамотно запрос гуглу на эту тему :-( На фразу perl+deamon находит кучу всего... зарыться можно...
Подсобите, плиз.
Сильно помог бы примерчик работающего скрипта...
Пытался понять как это дело сотворено в ВэбДмине - очень сложно.... :-(( Для меня, я так думаю :-)

Ленивый гость:
kak nashet chego-nit\' s inetd (xinetd v novyh linuxah)  ??

Propishi script po tomu portu, on dannye vrode cheres stdin dolzhen poluchat\'

Stas:
#!/usr/bin/perl

while (1)
{
print "Test";
}

[/etc/xinetd.d/test]
service testserv
{
        disable = no
        flags           = REUSE
        socket_type     = stream
        wait            = no
        user            = root
        server          = /path/to/perlscript
        port            = 666
}

Takim scriptom pravda flood poluchitsia ! ;)

КшЫуфксрук:
"Perl Cookbook" - 17.2. Writing a TCP Server

Ленивый гость:
This piece of text could be dangerous if you were to move your mouse over it!

Навигация

[0] Главная страница сообщений

[#] Следующая страница