VPF::Как получть список всех файлов на сайте

ru-vadik

Дата 12.5.2003, 05:32 (ссылка)

(голосов: 0)

Загрузка ...

Unregistered

Делаю поиск по сайту. Не могу получить список всех файлов сайта из всех подкаталогов любой вложенности.
Заранее спасибо за помощь.

Master

Дата 19.5.2003, 11:33 (ссылка)

(нет голосов)

Загрузка ...

Эксперт

Профиль
Группа: Участник Клуба
Сообщений: 1530
Регистрация: 13.5.2003
Где: Mother Russia

Репутация: нет
Всего: 10

Надо писать рекурсивную функцию.

Я не могу сейчас написать код, но логика такая.

1. Делаем функцию
2. Опправляем в нее путь к корневой директории
3. Пролистываем массив в который заносим список каталогов текущей дириктории отправляя путь текущего эллемента массива в эту же функцию
4. Перед этим записываем в xml или массив список (каталог+каждый файлв директории)

Вот и все.

--------------------

Вавилон, Вавилон
Что ты построил, что разрушил?
Вавилон, Вавилон
Плавятся души дьявольским огнем.

Unregistered

Дата 26.5.2003, 00:06 (ссылка)

(голосов: 0)

Загрузка ...

Unregistered

В книге Библиотека программиста есть такой пример:

Код


@ARGV = qw(.) unless @ARGV;
use File::Find;
find sub { print $File::Find::name, -d && '/', "\n" }, @ARGV;

- печатает все имена файлов, а если найдена директория, то добавляет в конце / (slash)

0 Пользователей читают эту тему (0 Гостей и 0 Скрытых Пользователей)
0 Пользователей:
« Предыдущая тема \| Perl: Общие вопросы \| Следующая тема »