18.12.2008, 21:29
|
|
Познающий
Регистрация: 19.09.2007
Сообщений: 38
С нами:
9813214
Репутация:
2
|
|
Народ . Прошу помочь. Проблема пустяковая но просто не могу понять в чем дело.
Задача такая :
Есть 2 файла. В одном Шаблоны для поиска(file1), во втором Текстовый файл в котором нужно непосредственно производить поиск (file2).
open file1, $file1 or die qq{cannot read "$file1": $! };
open file2,$file2 or die qq {cannot read "$file2":$!};
while (defined($string=<file1>))
{
chomp($string);
while (<file2>){
if (m/$string/)
{
$b=$_;
print "$b\n" ;
}
}
}
Почему то выполняется поиск только по первому шаблону.
Перепробывал кучу написаний с циклами масивами и т.д. Не могу понять в чем дело. |
|
|