|
|
ru.perl- RU.PERL ---------------------------------------------------------------------- From : Victor Pikman 2:5095/1.29 22 Mar 2001 11:41:25 To : Belyakov Sergey Subject : RE:ХЭШ -------------------------------------------------------------------------------- BS> my(@speed_range) = qw(1 14400 28800 33600 40000 43000 45000 50000 65000 BS> 115000 300000); BS> my($speed_list); BS> foreach $speed_list (@speed_range) { BS> $speeds{$speed_list} = 0; BS> } BS> BS> undef($speed_list); BS> BS> В результате в хэше получаю все вперемешку (немогу понять из-за чего). BS> BS> 1 0 28800 0 40000 0 50000 0 115000 0 43000 0 14400 0 45000 0 65000 0 BS> 33600 0 BS> BS> Как сделать что-бы в хэше все было нормально BS> (1 0 14400 0 28800 0 33600 0 ....) Хэш хранит все в дереве ( по-моему, бинарном, а может, и АВЛ или еще каком-то ), поэтому и умеет осуществлять быстрый поиск по ключу. Тебе надо для упорядочивания при выводе использовать sort keys. у или переписАть хэш в массив аккурат так, как хочешь хранить. Правда, тогда непонятно, зачем хэш ( 8-)>>. WBR, Pikman ( aka pikman@mail.ru ) --- FIPS/32 v0.99b W95/NT [M] * Origin: (2:5095/1.29) Вернуться к списку тем, сортированных по: возрастание даты уменьшение даты тема автор
Архивное /ru.perl/28143ab9aca5.html, оценка из 5, голосов 10
|