|
|
ru.perl- RU.PERL ---------------------------------------------------------------------- From : RockMover 2:5020/400 21 Oct 2000 21:34:53 To : Eugeny Averin Subject : Re: Как пpоще всего pазделить... --------------------------------------------------------------------------------
Привет!
Eugeny Averin wrote:
[...]
> О-еее! Это элегантнее моего ваpианта.
One more way to do it :)
$a="апываываываываываываымчииьтмpьенгкгва";
$k=5;
@some_array= unpack("A$k" x ( (length($a)+$k-1)/$k ), $a);
[...]
WBR, RockMover
I am The Master of Flame...
--- ifmail v.2.15dev5
* Origin: Azeroth delenda est! (2:5020/400)
Вернуться к списку тем, сортированных по: возрастание даты уменьшение даты тема автор
Архивное /ru.perl/167952b7080b3.html, оценка из 5, голосов 10
|