|
ru.perl
- RU.PERL ----------------------------------------------------------------------
From : Igor Gerdler 2:5020/400 20 May 2002 20:32:16
To : Sobolyev Oleg
Subject : Замечание
--------------------------------------------------------------------------------
Добрый день, уважаемый Oleg!
> А так не проще? :-)))
> $s = 'abdefghijklmoprs7t.......';
> @m = $s =~ /(.{160})/g;
> print join "\n",@m;
Проще, но как быть с остатком строки длиной меньше 160 символов? Он в
массиве будет присутствовать?
Предложу другой вариант:
@m = $s =~ /(.{1,160})/g;
Всего доброго!
Игорь Гердлер
--- ifmail v.2.15dev5
* Origin: Demos online service (2:5020/400)
Вернуться к списку тем, сортированных по: возрастание даты уменьшение даты тема автор
|
