|
ru.perl- RU.PERL ---------------------------------------------------------------------- From : gleb 2:5020/400 14 May 2004 09:33:02 To : Misha Shiposh Subject : Re: Проблем -------------------------------------------------------------------------------- Здравствуйте, Misha. Вы писали 11 мая 2004 г., 23:42:36: MS> Сортируте так: MS> 2:5023/41.4 MS> 2:5023/41.5 MS> 2:5023/42.111 MS> 2:5023/42.2 MS> 2:5023/42.22 MS> 2:5023/42.5 MS> Hужно так: MS> 2:5023/41.4 MS> 2:5023/41.5 MS> 2:5023/42.2 MS> 2:5023/42.5 MS> 2:5023/42.22 MS> 2:5023/42.111 Я решал подобную сортировку таким способом: (на примере ip-адресов) @orderadrss = map { $_->[0] } sort { $a->[1] <=> $b->[1] || $a->[2] <=> $b->[2] || $a->[3] <=> $b->[3] || $a->[4] <=> $b->[4] } map { [$_, split(/\./, $_)] } @unorderadrss; где, @unorderadrss - массив с несортированными адресами, @orderadrss - результат сортировки -- С уважением, gleb mailto:gleb@company.utk.ru Отправлено через сервер Форумы@mail.ru - http://talk.mail.ru --- ifmail v.2.15dev5.3 * Origin: Talk.Mail.Ru (2:5020/400) Вернуться к списку тем, сортированных по: возрастание даты уменьшение даты тема автор
Архивное /ru.perl/9096ae00d18c.html, оценка из 5, голосов 10
|