lynx
Advanced lynx | Редактировать | Профиль | Сообщение | Цитировать | Сообщить модератору
Хочу ограничить число символов в подписи - для каждой строки не более 70, например.
Делаю так у тебя:
profile.cgi
Код:
$newsignature =~ s/\t//g;
$newsignature =~ s/\r//g;
$newsignature =~ s/ / /g;
$newsignature =~ s/\n\n//g;
$newsignature =~ s/\n/\[br\]/g;
#$newsignature = substr($newsignature,0,70);
##Так все режется до 70 символов
}
@testsig = split(/\[br\]/,$newsignature);
$siglines = @testsig;
##Тут обрезаем каждую строку подписи.
foreach $smy (@testsig){
$newsignature = substr($newsignature,0,70);
} |
Пашет кривенько. То есть, не дает в каждой строке 70 символов поставить, но подпись обрезает.
Если в то же самое место я прикручиваю тот же самый код на стандартную конфу, то вообще этот код игнориться в том смысле, что подпись не обрезается.
Вопрос 1. Что я криво написала у себя?
2. Вопрос 2. Где в стандартной еще порыть, чтобы код исполнялся? |
