ru.unix.bsd

 
 - RU.UNIX.BSD ------------------------------------------------------------------
 From : Andrey Ivanov                        2:5020/400     18 Jan 2003  11:31:22
 To : Tema Zelikin
 Subject : Re: perl
 -------------------------------------------------------------------------------- 
 

 Tema Zelikin wrote:
 
 > имеется файл, его читает перл-скрипт.
 > как при наличии в файле строчки, содержащей .z7.fidonet.org, выставлять
 > какую-либо переменную в нужное значение?
 > я в сабже пока полный чайник, объясните плиз кому не влом..
 > 
 > ЗЫ мне это нужно, чтобы писать в z7 эхи с адреса z7, а не z2.
 > у меня фидогейт+dnews, и send-fidogate взят из мануала, который пролетал в
 > ru.unix.ftn.. но там формируется пакет с конкретного адреса, а мне нужно его
 > менять в зависимости от содержимого файла.
 > 
 
 some_variable="not founded";
 open(FILE,"sourcefile.txt");
 while(<FILE>){
   if(index($_,".z7.fidonet.org")){
    some_variable="finded";
   }
 }
 close(FILE);
 print(some_variable);
 
 -- 
 Best regards,
 Andrey Ivanov.
 mail-to: aivanov@damen-okean.com
 icq: 141800737
 http://explosives.narod.ru
 
 --- ifmail v.2.15dev5
  * Origin: Demos online service (2:5020/400)
 
 

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

Тема:    Автор:    Дата:    perl   Tema Zelikin   14 Jan 2003 02:23:03   Re: perl   Andrey Ivanov   18 Jan 2003 11:31:22