|
ru.perl- RU.PERL ---------------------------------------------------------------------- From : Artiom Morozov 2:450/166.444 27 Oct 2000 23:53:47 To : Alexander Babanov Subject : Как пpоще всего pазделить... --------------------------------------------------------------------------------
[Четверг Октябрь 26 2000$Alexander Babanov]# talk Artiom Morozov:
AB>>> while($a) { push @b, substr $a, 0, 5, ""; }
AM>> @b = ($a =~ /.{1,5}/gs);
AM>> ещё не пробовали? ;-)
AB> Проходило еще в первом слушании :) Только без /s
AB> Еще варианты будут?
Без /s не сработает на \n. Меньше уже не будет, а чтоб быстрее - на xsub можно
набросать.
Farewell to thee
Artiom.
... Оптимисты изобрели самолёт. Пессимисты - парашют...
--- GoldEd/Win32
* Origin: Сколько линухоида не корми-всё равно в консоль лезет (2:450/166.444)
Вернуться к списку тем, сортированных по: возрастание даты уменьшение даты тема автор
Архивное /ru.perl/398239f9ebc0.html, оценка из 5, голосов 10
|