ru.perl

 
 - RU.PERL ----------------------------------------------------------------------
 From : Bulat Ziganshin                      2:5093/28.126  12 May 2004  10:23:40
 To : Misha Shiposh
 Subject : Проблем
 -------------------------------------------------------------------------------- 
 

 Приятного тебе дня и незабываемой ночи, Misha!
 
 Wednesday May 12 2004, Serge Chervjakov writes to Misha Shiposh:
 
  MS>> Hужно так:
  MS>> 2:5023/41.4
  MS>> 2:5023/41.5
  MS>> 2:5023/42.2
  MS>> 2:5023/42.5
  MS>> 2:5023/42.22
  MS>> 2:5023/42.111
 
  MS>> Ясно что cmp ставлю не по своей воле, с пониманием того что
  MS>> циферки и должно быть  "<равно>" Была идей через регесп
  MS>> обработать последние циферки, тока вот как, куда пихать регесп, и
  MS>> есть ли в этом смысл?
 
  MS>> PS Как сортировочку сделать?
 
 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]);
 };
 Bulat, mailto:bulatz-AT-fort.tatarstan.ru, ICQ: work 15872722, home 11849833
 
 ... Иногда для того, чтобы изменить свое восприятие мира,
 ... люди пытаются изменить сам мир
 --- GoldED+/W32 1.1.2
  * Origin: Чубайс - повелитель Тьмы (2:5093/28.126)
 
 

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

Тема:    Автор:    Дата:    Проблем   Serge Chervjakov   12 May 2004 08:51:20   Проблем   Bulat Ziganshin   12 May 2004 10:23:40   Проблем   Misha Shiposh   13 May 2004 01:55:39