ru.perl
- RU.PERL ----------------------------------------------------------------------
From : InSAn 2:5020/400 14 Dec 2000 18:26:17
To : All
Subject : Re: Сортировка массива.
--------------------------------------------------------------------------------
Kozachenko Alexey <alexey@infor.ru> сообщил в новостях
следующее:9186uh$19rk$1@ddt.demos.su...
> Привет Алл.!
>
> Есть массива вида:
> 2234||aaaaaaaaaaa
> 4532||bbbbbbbbbbbbbb
> 554||ccccccccccccccccc
>
> Hужно его отсортировать так чтобы было:
> 554||ccccccccccccccccc
> 2234||aaaaaaaaaaa
> 4532||bbbbbbbbbbbbbb
>
> т.е. по возрастанию номера. Как это сделать?
>
@record = sort {($b =~ /(\w+)\|\|(\d+)/)[1] <=> ($a =~ /(\w+)\|\|(\d+)/)[1]}
@record;
- ---
Best Regards, InSAn (insan@al.ru)
http://insan.al.ru - Уголок программиста
--
Отправлено через сервер Talk.Ru - http://www.talk.ru
--- ifmail v.2.15dev5
* Origin: Talk.Ru (2:5020/400)
Вернуться к списку тем, сортированных по: возрастание даты уменьшение даты тема автор
|
