|
|
ru.perl- RU.PERL ---------------------------------------------------------------------- From : Artem Chuprina 2:5020/400 09 Aug 2002 20:12:10 To : Slava Kostin Subject : Re: Hа: Рекурсивный обход каталогов -------------------------------------------------------------------------------- Здравствуй, Slava Kostin. >>> AG> foreach $d (sort { $a cmp $b } readdir(DIR)) { AG>> readdir(DIR) - прочитали список файлов каталога AG>> sort { $a cmp $b } - отсортировали его AG>> { $a cmp $b } - по возрастанию (можно опустить, ранее тут была AG>> сортировка по датам) foreach $d - побежали по отсортированному списку SK> Все понял. Вот это не понял: sort { $a cmp $b } SK> Hизя было sort(readdir(DIR))? Можно. -- 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/144544d0d320a.html, оценка из 5, голосов 10
|