![]() |
Модераторы: korob2001, ginnie |
![]() ![]() ![]() |
|
Suppir |
|
|||
Опытный ![]() ![]() Профиль Группа: Участник Сообщений: 588 Регистрация: 20.4.2009 Репутация: нет Всего: нет |
Добрый день!
Есть хеш массивов вида: $hash{Иванов} 5, 6, 10 {Петров} 17, 1, 1000 {Кукурузин} 11, 2, 10 Подскажите, как вывести в файл этот хеш с сортировкой фамилий - по алфавиту, а числовых значений - по возрастанию. Т.е. должно получиться: Иванов -> 5, 6, 10 Кукурузин -> 1, 17, 1000 Петров -> 1, 17, 1000 Добавлено @ 15:25 p.s. только, пожалуйста, не в виде однострочника!!! ![]() p.p.s. Perl Data Structures Cookbook читал. Там нет такого примера. Это сообщение отредактировал(а) Suppir - 1.9.2011, 15:29 |
|||
|
||||
arto |
|
|||
Эксперт ![]() ![]() ![]() Профиль Группа: Завсегдатай Сообщений: 1495 Регистрация: 31.10.2004 Репутация: 38 Всего: 40 |
однострочник -- самовыражение, остальное -- платная техническая поддежка.
|
|||
|
||||
Suppir |
|
|||
Опытный ![]() ![]() Профиль Группа: Участник Сообщений: 588 Регистрация: 20.4.2009 Репутация: нет Всего: нет |
arto, давайте однострочник. Как-нибудь попробую разгрести
![]() |
|||
|
||||
arto |
|
|||
Эксперт ![]() ![]() ![]() Профиль Группа: Завсегдатай Сообщений: 1495 Регистрация: 31.10.2004 Репутация: 38 Всего: 40 |
# perl -C6 -Mutf8 -le '$hash = { ''Иванов'' => [ 5, 6, 10 ], ''Петров'' => [ 17, 1, 1000 ], ''Кукурузин'' => [ 11, 2, 10 ] }; print join "\n", map { "$_: @{[join'', '',sort{$a<=>$b}@{$hash->{$_}}]}" } sort keys %$hash'
Иванов: 5, 6, 10 Кукурузин: 2, 10, 11 Петров: 1, 17, 1000 # |
|||
|
||||
Suppir |
|
|||
Опытный ![]() ![]() Профиль Группа: Участник Сообщений: 588 Регистрация: 20.4.2009 Репутация: нет Всего: нет |
Спасибо, буду разбираться!
|
|||
|
||||
![]() ![]() ![]() |
Правила форума "Perl" | |
|
Если Вам понравилась атмосфера форума, заходите к нам чаще! С уважением, korob2001, sharq. |
1 Пользователей читают эту тему (1 Гостей и 0 Скрытых Пользователей) | |
0 Пользователей: | |
« Предыдущая тема | Perl: Общие вопросы | Следующая тема » |
|
По вопросам размещения рекламы пишите на vladimir(sobaka)vingrad.ru
Отказ от ответственности Powered by Invision Power Board(R) 1.3 © 2003 IPS, Inc. |