Исходное сообщение
"помогите реализовать на perl следующие:" Отправлено gloomy_pilgrim, 25-Сен-09 19:07
Есть необходимость открывать и лочить несколько файлов в определенной директории для их обработки. my @file_list = `ls $file_tmp`; ... тут выбираются только файлы удовлетворяющие определенному условию, тут все нормально и работает, поэтому пропустил. ... Далее открываем нужные нам файлы # open and lock selected files for(my $i=0; $i<scalar(@file_list); $i++) {         open("FILE_$i","<$file_tmp/$file_list[$i]") or die "Can't open $file_tmp/$file_list[$i]: $!";         flock("FILE_$i",1); ... } Вобщем получаем несколько дескрипторов файлов с именам FILE_0, и тд. И их количество не фиксировано и завист от количестфа файлов. Далее нужно поочередно считывать часть содержимого файлов в массив. Так вот тут возникла трудность, как мне правильно организовать это в цикле. Никак не могу понять, как можно работать с не фиксированным именем дескриптора Например: for(my $i=0; $i<scalar(@file_list); $i++) { @table = <"FILE_".$i> - естественно это не работает!!! } Сорри, в перле новичок, пните в нужную сторону.

Ваше сообщение
Имя*:
EMail:	Для отправки новых сообщений в текущей нити на email укажите знак ! перед адресом, например, !user@host.ru (!! - не показывать email). Более тонкая настройка отправки ответов производится в профиле зарегистрированного участника форума.
Заголовок*:
Сообщение*:	> Есть необходимость открывать и лочить несколько файлов в определенной директории для их > обработки. > my @file_list = `ls $file_tmp`; > ... > тут выбираются только файлы удовлетворяющие определенному условию, > тут все нормально и работает, поэтому пропустил. > ... > Далее открываем нужные нам файлы > # open and lock selected files > for(my $i=0; $i<scalar(@file_list); $i++) > { > open("FILE_$i","<$file_tmp/$file_list[$i]") or die "Can't > open $file_tmp/$file_list[$i]: $!"; > flock("FILE_$i",1); > ... > } > Вобщем получаем несколько дескрипторов файлов с именам FILE_0, и тд. > И их количество не фиксировано и завист от количестфа файлов. > Далее нужно поочередно считывать часть содержимого файлов в массив. > Так вот тут возникла трудность, как мне правильно организовать это в цикле. > Никак не могу понять, как можно работать с не фиксированным именем дескриптора > Например: > for(my $i=0; $i<scalar(@file_list); $i++) > { > @table = <"FILE_".$i> - естественно это не работает!!! > } > Сорри, в перле новичок, пните в нужную сторону.
	Введите код, изображенный на картинке: