|
ru.perl
- RU.PERL ----------------------------------------------------------------------
From : Oleg Strelchenko 2:5024/73 20 May 2002 12:27:54
To : Rostislav Podgornyi
Subject : разбить длиннуй мессагу
--------------------------------------------------------------------------------
Воскресенье Май 19 2002 21:59, Rostislav Podgornyi писал для All:
RP> Есть пеpеменная с опpеделённым текстом.
RP> Hужно pазбить текст из этой пеpеменной по 160 символов и запихнуть в
RP> массив.
RP> Как это сделать?
Я делаю вот так: (Даже приблизительно знаю зачем) :-)))
#
#[...]
$Message = "Hужно pазбить текст из этой пеpеменной по 160 символов и ...";
$LenMsg = length($Message);
$KolvoSend = $LenMsg / 155;
if ( $LenTr < 158 ){
printf ("%s\n",$Message); }else{
for ($i=0; $i<$KolvoSend; $i++){
printf ("(%s) %s\n",$i+1,$Message); }
Всего доброго !!!
Oleg
--- GoldED/LNX 3.0.1-asa10 beta 2
* Origin: [HAM-RADIO BBS-Vladimir/Russia] (2:5024/73)
Вернуться к списку тем, сортированных по: возрастание даты уменьшение даты тема автор
|
