|
ru.perl
- RU.PERL ----------------------------------------------------------------------
From : Stephen V Avdeyev 2:5090/44 11 Apr 2001 10:35:24
To : All
Subject : способ отсортировать массив строк по произвольному алфавиту
--------------------------------------------------------------------------------
подскажите, плиз, более-менее эффективный способ отсортировать массив строк по
произвольному алфавиту, типа:
$abc = 'абвгдabcde012345'; # задали алфавит
@array = ('аббав1', аббавdce', 'abcde'); # задали массив
@array = sort {как-то использовать $abc} @array; # отсортировали
чтобы на выходе получить:
(аббавdce, аббав1, abcde)
ы?
За сим откланиваюсь, Stephen [Argus team]
... http://www.cfcc.org.ru/ - Central Fairfax Commerce Chamber
--- GoldED/W32 3.00.Beta4+ (http://fido.ktk.ru - Красноярское ФИДО)
* Origin: AFRICA Online (2:5090/44)
Вернуться к списку тем, сортированных по: возрастание даты уменьшение даты тема автор
|
