|
ru.perl- RU.PERL ---------------------------------------------------------------------- From : Konstantin Maslennikov 2:5020/400 31 Oct 2000 09:55:39 To : All Subject : Re: ПОЧЕМУ ЖЕ???? -------------------------------------------------------------------------------- Ilya Obshadko <ilya@e-labs.ru> пишет в сообщении:39fc8057$1@news.rtsnet.ru... > "Konstantin Maslennikov" <kosmas@mail.wplus.net> wrote in message > news:8tgsdb$slj$1@news.wplus.spb.ru... > > Привет всем! > > > > [example skipped] > > > Внимание, вопрос: ПОЧЕМУ "Воркута" уехала в конец???? Чем отличается > вывод > > скрипта в консоль от вывода в броузер??? > > Сделай foreach ( sort { $a <=> $b } keys %hash ) { .... } > И не мучь себя этим замысловатым вопросом. Гм... А это ничего, что <=> используется для чисел? > man perlfunc, sort Там так и написано: # sort lexically @articles = sort @files; # same thing, but with explicit sort routine @articles = sort {$a cmp $b} @files; # now case-insensitively @articles = sort {uc($a) cmp uc($b)} @files; # same thing in reversed order @articles = sort {$b cmp $a} @files; # sort numerically ascending @articles = sort {$a <=> $b} @files; # sort numerically descending @articles = sort {$b <=> $a} @files; Hа самом деле уже все получилось, спасибо всем, кто откликнулся... -- Best regards, K.Maslennikov kosmas@mail.wplus.net http://www.ksp.spb.ru --- ifmail v.2.15dev5 * Origin: WEBPlus Ltd. (2:5020/400) Вернуться к списку тем, сортированных по: возрастание даты уменьшение даты тема автор
Архивное /ru.perl/134313f206265.html, оценка из 5, голосов 10
|