|
ru.perl- RU.PERL ---------------------------------------------------------------------- From : Ilya Rubtsov 2:5020/400 15 Jun 2000 23:33:32 To : All Subject : Re: file list -------------------------------------------------------------------------------- On Thu, 15 Jun 2000 17:18:03 +0400, Sergey Seredin <Sergey.Seredin@p23.f1772.n5020.z2.fidonet.org> wrote: >а никто не поделиться пpимеpчиком? чтоб он взял имена всех файлов из >опpеделенной диpектоpии и вывел на экpан >или хоть скажите как perldoc -f opendir perldoc -f readdir perldoc -f closedir Пример из perldoc по readdir: opendir(DIR, $some_dir) || die "can't opendir $some_dir: $!"; @dots = grep { /^\./ && -f "$some_dir/$_" } readdir(DIR); closedir DIR; Тады у тебя в @dots будут имена всех файлов из той диры, которые(имена) начинаются с точки. --- ifmail v.2.15dev5 * Origin: Demos online service (2:5020/400) Вернуться к списку тем, сортированных по: возрастание даты уменьшение даты тема автор
Архивное /ru.perl/2080568c022e.html, оценка из 5, голосов 10
|