ru.linux

 
 - RU.LINUX ---------------------------------------------------------------------
 From : Slava                                2:5020/400     03 Jan 2004  01:53:29
 To : All
 Subject : скрипт
 -------------------------------------------------------------------------------- 
 

 Hi All
 
 Hадо написать скрипт на перл для хчата что бы если ко мне зайдет кто-нибудь
 в приват проигрывался звук. В перле я не силен, но скриптик написал:
 
 #!/usr/bin/perl -w
 IRC::register("Play sound", "v0.1 beta", "", "");
 IRC::add_message_handler(PRIVMSG, on_msg);
 sub on_msg
 {
 system "artsplay privat.wav";
 }
 IRC::print " Play sound script loaded...";
 
 Проблема в том что звук проигрывается не только когда ко мне кто-нибудь
 стучится в приват, а иногда(почти все-время) играет просто так 
 
 Вопрос: что сделал не так?
 -- 
 ftp://10.26.19.72
 --- ifmail v.2.15dev5.1
  * Origin: Home (2:5020/400)
 
 

Вернуться к списку тем, сортированных по: возрастание даты  уменьшение даты  тема  автор