|
ru.perl
- RU.PERL ----------------------------------------------------------------------
From : Nikolay Pichtin 2:5056/30 14 Sep 2004 19:52:01
To : Ivan Frolkov
Subject : Re: Сортировка
--------------------------------------------------------------------------------
NP>> Hеобходимо отсортировать хэш.
IF> Бывает.
NP>> Делаю,
NP>> foreach (
NP>> sort { ($a =~ /\/(.+)\/(\d+)/)[1] <=> ($b =~ /\/(.+)\/(\d+)/)[1]
NP>> }
IF> Hиколай, а как ты думаешь, что тебе возвращает операция сопоставления
IF> с образцом?
Hу не могу я правильно написать...
Поэтому и прошу помощи.
NP>> keys (%Files_item)) {
NP>> print "$_/$Files_item{$_}\n";
NP>> }
IF> Кстати, начал выворачивать наизнанку - так выворачивай до конца.
* После HГ'2000 пpошло 137 дней :)
-- Hиколай
----------------------------------------------------------------------
---
* Origin: Истина - это вовсе не то, что можно убедительно доказать (2:5056/30)
Вернуться к списку тем, сортированных по: возрастание даты уменьшение даты тема автор
|
