Здравствуйте, 

С формы обратной связи моего сайта я сохраняю все поля в базу данный MySQl: имя, страна, город, телефон,  тема сообщения, текст сообщения и т.п. Затем я записываю текстовый файл с разделителями табуляций из этой базы с расширением .xls и получаю документ, который могу открыть в программе Excel. Все корректно записывается в файл, пока не попадается символ конца абзаца. Люди пишут текст сообщения в несколько строк (каждая строка заканчивается символом абзаца).

Подскажите, пожалуйста, регулярное выражение, которое при внесении строки текста в базу или при выборки из базы будет находить символ абзаца и заменять его, например, на символ пробела. Мне надо склеить все строки в одну цепочку, чтобы мой записываемый .xls файл при открытии корректно отображал каждое поле записи в отдельной ячейки Excel.


Спасибо всем кто откликнется!

$str =~ s/\n|\r/ /g;

Другой вариант:


Если "символ абзаца" это перевод строки.

Брр, написал фигню, но потом понял, что написал фигню и потёр.   

Это сообщение отредактировал(а) srl - 20.1.2011, 23:43

Спасибо! Простите чайника, как мне правильно применить этот код, чтой-то не получаеца. Как правильно присвоения сделать, вот у меня есть элемент массива с переводом строк $row[10] (исходный неправильный вариант), как мне применить код регулярного выражения чтобы в $str занести текст с уже удаленными символами абзацев (перевода строки).

Спасибо еще раз.  

если в одном элементе массива несколько строк для которых нужно применить выражение то добавьте в конце регулярного выражения модификатор g;

Что-то не то....




записывает в $str цифру 1 для любой строки.



записывает в $str  разные цифры, например 8 для одной строки, 10 - для другой.


А должен быть текст! а не цифры, соединенный символом "пробел", вместо знаков абзаца.



Я могу написать свою процедуру, которая в цикле прогонит все символы и там где есть символ абзаца, его уберет и поставит символ пробела. Только я не знаю какой символ обозначает абзац (перевод строки)? Например в $s я прочитаю очередной символ, с чем мне его корректно сравнить чтобы узнать что это абзац?

if ($s eq "символ абзаца")
 {
отрезаем абзац, ставим пробел
}

Подскажите "символ абзаца", пжл.


Спасибо!






Это сообщение отредактировал(а) dmipro - 21.1.2011, 17:12

перевод строки зависит от системы, в unix-подобных это \n, в windows это два символа \r\n, в Mac OS классике говорят что \r, но такое уже наверно не встретися.

попробуйте еще 

если не хотите метять прямо в @row

или

или

да, awkward прав, я не там скобку поставил

Теперь все хорошо! 

Спасибо alezzz, awkward и Jimy