|
|
ru.perl- RU.PERL ---------------------------------------------------------------------- From : Artem Chuprina 2:5020/400 15 Sep 2004 14:46:16 To : Nikolay Pichtin Subject : Re: Сортировка -------------------------------------------------------------------------------- Nikolay Pichtin -> Artem Chuprina @ Tue, 14 Sep 2004 18:53:31 +0400: NP>>> Hеобходимо отсортировать хэш. NP>>> Делаю, NP>>> foreach ( NP>>> sort { ($a =~ /\/(.+)\/(\d+)/)[1] <=> ($b =~ /\/(.+)\/(\d+)/)[1] NP>>> } keys (%Files_item)) { print "$_/$Files_item{$_}\n"; } NP>>> Hо отсортировывается не правильно. Как поправить сортировку? AC>> Как попросили - так и сортируется. По числовой директории. А как AC>> хотелось-то? (Прежде чем ответить - подумай, а то будет опять две AC>> лишних итерации.) NP> Хотелось бы так: NP> /1/dat.dat NP> 1/1.1/dat NP> 1/1.1.1/dat NP> 1/1.1.2/dat NP> 1/1.2/dat NP> 1/1.2.1/dat NP> и т.д. Это ничего, если у тебя 1.10.1 окажется раньше 1.2.1? Или ты полагаешь, что я от нефиг делать просил предварительно подумать над ответом? -- Artem Chuprina RFC2822: <ran@ran.pp.ru>, FIDO: 2:5020/122.256, ICQ: 13038757 --- ifmail v.2.15dev5.3 * Origin: Leninsky 45 home network (2:5020/400) Вернуться к списку тем, сортированных по: возрастание даты уменьшение даты тема автор
Архивное /ru.perl/256060d87bbf7.html, оценка из 5, голосов 10
|