Perl предоставляет не только широкий набор функций для обработки файлов, но также несколько очень удобных функций для сканирования каталогов. В следующих разделах мы рассмотрим некоторые из основных функций для работы с каталогами в деталях. Открытие, чтение и закрытие каталогов Скрипты на языке Perl позволяют открывать и читать содержимое файлов. Точно так же эти скрипты открывают каталоги и читают имена содержащихся в них слайдов. Для открытия каталога скрипты используют функцию opendir, передавая указатель каталога и путь к нему. Для чтения списка файлов, содержащихся в каталоге, скриптиспользует функцию readdir. Наконец, для закрытия каталога используется функция closedir. Следующий фрагмент программы иллюстрирует использование функции readdir для того, чтобы вывести на экран список файлов в текущем каталоге: opendir(Dir, $INC[2]) || die; while ($file = readdir(Dir)) { print "$file \n" } closedir(Dir); В этом фрагменте используется переменная $INC[2J для доступа к текущему каталогу. Изменяя $INC[2] на $ARGV[0], скрипт выводит на экран список файлов, содержащихся в каталоге, который вы указали в командной строке. В дополнение к функциям для работы с каталогами, которые были рассмотрены выше, Perl предлагает еще набор функций, которые позволяют позиционировать текущий указатель в списке каталога: $result = rewinddir(DirHandle); $result = telldir(DirHandle); $result = seekdir(DirHandle, Position);  8  Комментарии к статье  8 8  Обсудить в чате

8  В тему Встроенные функции Операторы PERL Файловый ввод и вывод Обработка бинарных данных Форматированный вывод Регулярные выражения