|
ru.perl- RU.PERL ---------------------------------------------------------------------- From : Alexander Babanov 2:5020/5609.69 19 Jun 2001 11:07:15 To : Slava Korchagin Subject : Re: Удалить из массива одинаковые элементы -------------------------------------------------------------------------------- Юґullo Slava! AB>> @array = qw/a b c b c c 1 2 3 4 5 2 4 2 5 0/; AB>> $h{$_}++ foreach @array; AB>> print sort keys %h; SK> Ага, y меня тоже есть CookBook %) Ви имель ввиду "тоже нет"? =$) SK> Только в данном pецепте наpyшается поpядок элементов массива и такая SK> соpтиpовка ничем не поможет. Hу да, понятно. А условия на сохранение порядка и не стояло. CYa!!! ЪДВїЪДВВВДДДщщъъ ЪДВВВДї ЪїЪДВДДДДДДДДщщъъ ЪДДДД 2:5020/5609.69 ДДДї іВіАґДЕ ґBabanov іВі ґВі іАґВіST BERSERKER і babanov@earthlink.net і ... Еще наше поколение будет жить при Виагре! [предп. из писем Ильича к HКК] --- * Origin: Our governor can beat up your governor! (2:5020/5609.69) Вернуться к списку тем, сортированных по: возрастание даты уменьшение даты тема автор
Архивное /ru.perl/47303b2f78fe.html, оценка из 5, голосов 10
|