|
|
ru.perl- RU.PERL ---------------------------------------------------------------------- From : Alexander V. Gaiduk 2:5020/400 12 Aug 2002 11:49:09 To : Andrey Sapozhnikov Subject : Hа: Hа: Рекурсивный обход каталогов -------------------------------------------------------------------------------- > > >>> 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))? > > > > Можно. > > Hо сортировало бы не по алфавиту... а разве простой sort не эквивалентен sort { $a cmp $b } имхо с простым sort список получится по алфавиту. > > Андрей > > > --- ifmail v.2.15dev5 * Origin: LesoBANK (2:5020/400) Вернуться к списку тем, сортированных по: возрастание даты уменьшение даты тема автор
Архивное /ru.perl/11999b0fd4368.html, оценка из 5, голосов 10
|