https://opennet.dev/openforum/vsluhforumID9/6892.html мне надо по xinetd выполнять несколько команд через виндовый интерфейс написаный на делфях<br>если кратко то знаю как создать службу в xinet.d например какой нибудь mounter следующего содержания<br>service usbmount<br>{<br> socket_type = stream<br> wait = no<br> user = root<br> server = /usr/sinhron/mounter<br> disable = no<br> port = xxxx<br>}<br><br>в этом каталоге /usr/sinhron/mounter хранится скрипт на перле, но я не очень хорошо знаю перл в этом скрипте написано<br><br><br>#!/usr/bin/perl<br>system "mount /dev/sdb1 /mnt/fleshka";<br>exit 0;<br><br>но это только 1 команда, оно срабатывает сразу после подключения на заданый порт<br>как организовать так что бы этот скрипт не сразу весь отрабатывался а на пример в програме есть 2 кнопки, смонтировать и размонтировать, он ожидал нажатия кнопки размонтировать...<br><br><br>Если есть, то очень желательно поделится скриптом, который бы висел на даном порту и принимал поток команд что передается внешней програмой написаной на делфях... https://opennet.dev/openforum/vsluhforumID9/6892.html#2 Tue, 30 Oct 2007 11:29:27 GMT &gt;[оверквотинг удален]<br>&gt;делфях <br>&gt;#!/usr/bin/perl <br>&gt;system "mount /dev/sdb1 /mnt/fleshka"; <br>&gt;exit 0; <br>&gt;<br>&gt;но это только 1 команда, оно срабатывает сразу после подключения на заданый <br>&gt;порт <br>&gt;как организовать так что бы этот скрипт не сразу весь отрабатывался а <br>&gt;на пример в програме есть 2 кнопки, смонтировать и размонтировать, он <br>&gt;ожидал нажатия кнопки размонтировать... <br><br>а ненадо нифига ожидать, это можно так целый месяц прождать.<br><br><br>&gt;<br>&gt;<br>&gt;Если есть, то очень желательно поделится скриптом, который бы висел на даном <br>&gt;порту и принимал поток команд что передается внешней програмой написаной на <br>&gt;делфях... <br><br>так дайте этот "поток команд" :)<br><br>my $cmd = &lt;&gt;;<br>chomp $cmd;<br>if($cmd eq "mount_usb") {<br> do_mount_usb();<br>} esif($cmd eq "umount_usb") {<br> do_umount_usb();<br>}<br><br> https://opennet.dev/openforum/vsluhforumID9/6892.html#1 Tue, 30 Oct 2007 11:26:10 GMT 1. юзать самопальную службу не стоит.<br>2. используйте например ssh(d)+sudo для выполнения системных команд удаленно.<br>3. может проще автомаунт настроить?<br><br>ЗЫ указанный перл скрипт избыточен по самое немогу ибо мало того что требует перл так еще и шелл скорее всего тянет за собой. можно же просто вызвать команду mount /dev/sdb1 /mnt/fleshka без самого перла))<br>