Forum Webscript.Ru

Программирование => Perl => Тема начата: Timofey от 17 Февраля 2003, 18:11:57

Название: список файлов в каталоге
Отправлено: Timofey от 17 Февраля 2003, 18:11:57
как узнать ТОЛЬКО список всех файлов в каталоге
(а то через readdir всле сразу лезет . .. и подкаталоги и т.п.)
Название: список файлов в каталоге
Отправлено: NeoNox от 17 Февраля 2003, 18:45:14
http://forums.webscript.ru/showthread.php?s=&threadid=10420&msgnum=9
Название: список файлов в каталоге
Отправлено: mike от 17 Февраля 2003, 19:33:31
perldoc -f grep
Вариант:

$path = "somepath";
opendir DIR, $path;
@files = grep { -f "$path\\\\$_" } readdir DIR;
closedir DIR;
Название: список файлов в каталоге
Отправлено: Wyclef от 17 Февраля 2003, 19:35:35
Цитировать
а то через readdir всле сразу лезет . .. и подкаталоги и т.п.


push @files, $_ if -f $_;
Название: список файлов в каталоге
Отправлено: innin от 18 Февраля 2003, 17:36:29
print <*.*>;
Название: список файлов в каталоге
Отправлено: Wyclef от 18 Февраля 2003, 18:07:13
Т.Кристиансен "Perl Библиотека программиста"
Название: список файлов в каталоге
Отправлено: innin от 18 Февраля 2003, 20:55:16
Wyclef
вы, наверное, имеете в виду Perl Cookbook Кристансена и Торкингтона :-)
Название: список файлов в каталоге
Отправлено: Wyclef от 19 Февраля 2003, 07:30:12
innin
именно, ты не мне говори а господину Timofey\'ю :)
Название: список файлов в каталоге
Отправлено: NeoNox от 19 Февраля 2003, 11:05:28
moderator
Флейм в данном разделе запрещен.
Учтите на будующее.
Тема закрыта.