ru.perl

 
 - RU.PERL ----------------------------------------------------------------------
 From : Vlad Pluzhnikov                      2:5021/19.19   12 May 2004  09:19:46
 To : Misha Shiposh
 Subject : Re: Проблем
 -------------------------------------------------------------------------------- 
 

 
 Tuesday May 11 2004 22:42, Misha Shiposh wrote to All:
 
  MS> Есть хешь массивов, ключами которого являются (в текстовом контексте)
  MS> строки типа 2:5023/42.1 и т.д.
 
 [snip]
 
 sub fido_order {          # Сравнение фидошных адресов для использования с sort
   my @a = split("[:./]",$a);
   my @b = split("[:./]",$b);
   return ($a[0] cmp $b[0]  or  $a[1] <=> $b[1]  or  $a[2] <=> $b[2]  or  $a[3]
 <=> $b[3]);
 };
 
 ну и  foreach $addr (sort fido_order(keys (%point))) { ...
 -- Vlad
 
 ... *t* _e_ /a/ *m* _я[я_ /Q/ *N* _X_ /я]я/ *r* _u_ /l/ *e* _z_
 --- GoldED+/W32 1.1.5-040120
  * Origin: QNX You Must See It To Believe It ! (2:5021/19.19)
 
 

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

Тема:    Автор:    Дата:    Проблем   Misha Shiposh   11 May 2004 22:42:36   Re: Проблем   Vlad Pluzhnikov   12 May 2004 09:19:46   Проблем   Bulat Ziganshin   12 May 2004 14:53:31   Re: Проблем   Vlad Pluzhnikov   13 May 2004 08:57:38