Модераторы: korob2001, ginnie
  

Поиск:

Ответ в темуСоздание новой темы Создание опроса
> Сортировка хеша хешей по значению 
:(
    Опции темы
comhunt
Дата 15.9.2013, 11:58 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


Шустрый
*


Профиль
Группа: Участник
Сообщений: 104
Регистрация: 20.3.2009

Репутация: нет
Всего: нет



Имеется хеш хешей
my %hash;
$hash{1}{aaa}=1;
$hash{1}{ccc}=3;
$hash{1}{ddd}=4;

$hash{2}{aaa}=7;
$hash{2}{ccc}=6;
$hash{2}{ddd}=5;

$hash{4}{aaa}=8;
$hash{4}{ccc}=3;
$hash{4}{ddd}=7;

Каким образом сформировать цикл в котором хеш сортировался бы по значению элемента хеша имеющего ключ {...}{ccc}?

С простым ("одномерным") хешем в принципе понятно как сортировать
foreach my $key(sort $hash{$a} <=> $hash{$b} keys %hash){...}

А вот с хешем хешей не могу сообразить как...

Это сообщение отредактировал(а) comhunt - 15.9.2013, 12:01
PM MAIL   Вверх
Jimy
Дата 15.9.2013, 13:14 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


Бывалый
*


Профиль
Группа: Участник
Сообщений: 177
Регистрация: 4.7.2010

Репутация: нет
Всего: 3



Код

sort {$hash{$a}{'ccc'} <=> $hash{$b}{'ccc'}}

PM   Вверх
noize
Дата 16.9.2013, 10:02 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


5.18.2
*


Профиль
Группа: Участник
Сообщений: 89
Регистрация: 10.7.2010
Где: СПб

Репутация: 3
Всего: 3



PM MAIL   Вверх
  
Ответ в темуСоздание новой темы Создание опроса
Правила форума "Perl"
korob2001
sharq
  • В этом разделе обсуждаются общие вопросы по языку Perl
  • Если ваш вопрос относится к системному программированию, задавайте его здесь
  • Если ваш вопрос относится к CGI программированию, задавайте его здесь
  • Интерпретатор Perl можно скачать здесь ActiveState, O'REILLY, The source for Perl
  • Справочное руководство "Установка perl-модулей", можно скачать здесь


Если Вам понравилась атмосфера форума, заходите к нам чаще! С уважением, korob2001, sharq.

 
1 Пользователей читают эту тему (1 Гостей и 0 Скрытых Пользователей)
0 Пользователей:
« Предыдущая тема | Perl: Общие вопросы | Следующая тема »


 




[ Время генерации скрипта: 0.0829 ]   [ Использовано запросов: 21 ]   [ GZIP включён ]


Реклама на сайте     Информационное спонсорство

 
По вопросам размещения рекламы пишите на vladimir(sobaka)vingrad.ru
Отказ от ответственности     Powered by Invision Power Board(R) 1.3 © 2003  IPS, Inc.