ru.perl

 
 - RU.PERL ----------------------------------------------------------------------
 From : Alexander Gaiduk                     2:5020/400     11 Sep 2000  17:33:43
 To : All
 Subject : Re: поиск
 -------------------------------------------------------------------------------- 
 

 >Привет всезнающему Аллу!!!
 >
 >Есть у меня текстовый файл, с кучей строчек. есть переменная, содержащая 1
 >слово. я хочу узнать, есть  ли это слово в этом файле и вывести строчку с
 
 этим
 
 >
 >словом.
 >
 >
 >$file="/usr/local/www/data/file.txt";
 >$word="some";
 >@massive= split /\n/, $file;
 >foreach $line(@massive){
 >if($line eq $word){
 >print $line;
 >}
 >}
 >
 >не работает, хотя в контенте файла точно есть слово some
 А читать строчки из файла бабушка будет?
 подумай внимательно над третьей строкой!
 что по твоему она делает?
 
 чутье мне подсказывает вместо нее надо что то типа:
 
 open(F, "<$file") || die "fuck!\n";
 @massive = <F>;
 close(F);
 
 С уважением,
 Александр Гайдук (gav@lesobank.ru)
 программист, вэбмастер АКБ Лесобанк
 http://www.lesobank.ru, http://wood.lesobank.ru
 --- ifmail v.2.15dev5
  * Origin: InterGalactic MegaTrash Co. (2:5020/400)
 
 

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

Тема:    Автор:    Дата:    поиск   dimka kuvshinov   10 Sep 2000 01:41:25   Re: поиск   dimka kuvshinov   10 Sep 2000 09:18:34   Re: поиск   Alexander Gaiduk   11 Sep 2000 17:33:43