|
ru.perl
- RU.PERL ----------------------------------------------------------------------
From : Alexander Babanov 2:5020/1978.3 27 Oct 2000 21:21:59
To : Artiom Morozov
Subject : Re: Как пpоще всего pазделить...
--------------------------------------------------------------------------------
Юґullo Artiom!
AB>>>> while($a) { push @b, substr $a, 0, 5, ""; }
AM>>> @b = ($a =~ /.{1,5}/gs);
AM>>> ещё не пробовали? ;-)
AB>> Проходило еще в первом слушании :) Только без /s
AB>> Еще варианты будут?
AM> Без /s не сработает на \n.
Так вроде и не просили :)
AM> Меньше уже не будет,
И не надо.
AM> а чтоб быстрее - на xsub можно набросать.
Тоже не надо. Быстрее/короче не обязательно, есть в эхотаге такие области
творчества, как Perl poetry и obfusicated Perl contest - можно считать это
задачей в одной из них =8) Тут уже кидали одного крокодила...
CYa!!!
ЪДВїЪДВВВДДДщщъъ ЪДВВВДї ЪїЪДВДДДДДДДДщщъъ ЪДДДД 2:5020/1978.3 ДДДДї
іВіАґДЕ ґBabanov іВі ґВі іАґВіST BERSERKER і babanov@earthlink.net і
... Еще наше поколение будет жить при Виагре! [предп. из писем Ильича к HКК]
---
* Origin: Our governor can beat up your governor! (2:5020/1978.3)
Вернуться к списку тем, сортированных по: возрастание даты уменьшение даты тема автор
|
