|
|
ru.perl- RU.PERL ---------------------------------------------------------------------- From : dimka kuvshinov 2:5020/400 16 Aug 2000 23:29:29 To : Alex Kachanov Subject : может при помощи сортировки хеша?? -------------------------------------------------------------------------------- Переменные и числа? В хеше есть сортировка по ключам и по значениям: добавляешь элементы в хеш из файла как-нибудь так: %hash = (%hash, 'кошка', 'мягкая'); Сортировка хэша: %hash = ( 'шляпа' => 'серая', 'водка' => 'горькая', 'вобла' => 'вкусная'); foreach $key(sort keys %hash){ print "$key => $hash{$key}\n"; #отсортирует в алфавитном порядке по значениям ключа } foreach $value(sort values %hash){ print "$value\n"; #сортировка по значению } Сортировка ключей по алфавиту ассоциированных значений: foreach $key(sort {$hash{$a} cmp $hash{$b}} keys %hash){ print $key, " => ", $hash{$key},"\n"; } Сортировка по длинне ассоциированных значений: @massive = sort{length($hash{$a}) <=> length($hash{$b})} keys %hash; foreach $key(@massive){ print $key, $hash{$key},"\n"; } http://phys.narod.ru/perl/hash.html - только не оборите сильно :))) -- Отправлено через сервер Talk.Ru - http://www.talk.ru --- ifmail v.2.15dev5 * Origin: Talk.ru (2:5020/400) Вернуться к списку тем, сортированных по: возрастание даты уменьшение даты тема автор
Архивное /ru.perl/64882b64b33d.html, оценка из 5, голосов 10
|