список файлов в каталоге

[Timofey]

как узнать ТОЛЬКО список всех файлов в каталоге
(а то через readdir всле сразу лезет . .. и подкаталоги и т.п.)

[NeoNox]

http://forums.webscript.ru/showthread.php?s=&threadid=10420&msgnum=9

[mike]

perldoc -f grep
Вариант:

Код: [Выделить]


$path = "somepath";
opendir DIR, $path;
@files = grep { -f "$path\\\\$_" } readdir DIR;
closedir DIR;


[Wyclef]

а то через readdir всле сразу лезет . .. и подкаталоги и т.п.

push @files, $_ if -f $_;

[innin]

print <*.*>;

[Wyclef]

Т.Кристиансен "Perl Библиотека программиста"

[innin]

Wyclef
вы, наверное, имеете в виду Perl Cookbook Кристансена и Торкингтона :-)

[Wyclef]

innin
именно, ты не мне говори а господину Timofey\'ю

[NeoNox]

moderator
Флейм в данном разделе запрещен.
Учтите на будующее.
Тема закрыта.