ru.perl

 
 - RU.PERL ----------------------------------------------------------------------
 From : Victor Wagner                        2:5020/400     24 Mar 2002  19:41:28
 To : John Lepikhin
 Subject : Re: сортировка
 -------------------------------------------------------------------------------- 
 

  John Lepikhin <John.Lepikhin@f156.n5070.z2.fidonet.org> wrote:
  
 JL> @sorted = sort { $a->[0] <=> $b->[0] || $a->[1] <=> $b->[1]
 JL> || $a->[2] <=> $b->[2] } @unsorted; 
  
 JL> Работает _на порядок_ медленнее сишного qsort с аналогичной
 JL> функцией сортировки. Все скаляры в массиве - заведомо
 JL> числовые. Как-нибудь можно оптимизировать? 
 
 man h2xs
  
 JL> --  ... [лесные компьютерщики] {allnet} {ptoss} 
 
 -- 
 Hа австралийской таможне:
   Таможенник: -- Судимости имеются?
   Англичанин: -- А что, это все еще требуется?
 --- ifmail v.2.15dev5
  * Origin: Free Net of Leninsky,45 (2:5020/400)
 
 

Вернуться к списку тем, сортированных по: возрастание даты  уменьшение даты  тема  автор