|
|
ru.perl- RU.PERL ---------------------------------------------------------------------- From : Artem Chuprina 2:5020/400 09 Aug 2002 13:54:17 To : Slava Kostin Subject : Re: Hа: Рекурсивный обход каталогов -------------------------------------------------------------------------------- Здравствуй, Slava Kostin. AG>> &scandir('/мой/секретный/каталог'); SK> ^поясни, плиз, зачем "&"? По глупости. AG>> sub scandir { SK> [Skipped] AG>> foreach $d (sort { $a cmp $b } readdir(DIR)) { SK> И, прошу прощения, и эту строчку прокомментируй, плиз. Отсортировать список, выданный readdir, по алфавиту, и по оному отсортированному списку запустить цикл, по очереди делая $d алиасом каждого элемента. perldoc perlop, perldoc -f readdir, perldoc -f sort. -- Artem Chuprina Communiware.net RFC2822: <ran@ran.pp.ru>, FIDO: 2:5020/358.49, ICQ: 13038757 --- ifmail v.2.15dev5 * Origin: Leninsky 45 home network (2:5020/400) Вернуться к списку тем, сортированных по: возрастание даты уменьшение даты тема автор
Архивное /ru.perl/14454821de753.html, оценка из 5, голосов 10
|