|
ru.perl- RU.PERL ---------------------------------------------------------------------- From : Misha Shiposh 2:5023/42.1 13 May 2004 01:55:39 To : Bulat Ziganshin Subject : Проблем --------------------------------------------------------------------------------
ИННННННННННННДДДДъъъъъ ъ ъ ъ
12 мая 2004 10:23, _Bulat Ziganshin_ НН. /Misha Shiposh/:
BZ> sub fido_order { # Сравнение фидошных адресов для использования с
BZ> sort
BZ> my @a = split("[:./]",$a);
BZ> my @b = split("[:./]",$b);
BZ> return ($a[0] cmp $b[0] or $a[1] <=> $b[1] or $a[2] <=> $b[2] or
BZ> $a[3] <=> $b[3]); };
Пасиб за иллюстрацию, и подсказку.
BCNU !
ДДДДДДДДДДДДДДДДДДДДДДДДДДДДДДДДДДДДДДДДДДДДДДДДДДДДДДДДДДДДДДДДДДДДДДД
... np: (Winamp is not active ;-)
--- Hеверь всему, что пишут...
* Origin: Фоpматиpовать винт будем (2:5023/42.1)
Вернуться к списку тем, сортированных по: возрастание даты уменьшение даты тема автор
Архивное /ru.perl/2149440a29d88.html, оценка из 5, голосов 10
|