1
					Perl / Уникальные элементы массива
« : 31 Марта 2005, 12:55:52 »
					спасибо большое, все работает
					
				В этом разделе можно просмотреть все сообщения, сделанные этим пользователем.
 
"... Вообщем-то это связано с тем, что в версиях 4.1.x используется кодировка UTF, а мои данные были в cp1251... Вообщем вопрос в следующем - как отключить UTF-8. Сменя default charset должных результатов не приносит.
					... И отрабатывает она соответсвенно предполагаемому... А мне надо ее модифицировать, чтоб замену производила внутри..
					:Код: [Выделить]
12:30 Новости
12:50 Погода
13:00 Сериал
Если быть конкретным, то программка.
нужно все что между тегами prу привести к виду:Код: [Выделить]12:30 Новости 12:50 Погода 13:00 Сериал 
Причем нужно сделать это именно одной регуляркой...
$text="<pre>
12:30 ntst
34:56 ншек
23:12 рапов
</pre>";
$text=~s/(\\d{2}:\\d{2}){1} (.*)/\\\\<tr\\\\>\\\\<td\\\\>$1\\\\<\\\\/td\\\\>\\\\<td\\\\>$2\\\\<\\\\/td\\\\>\\\\<\\\\/tr\\\\>/gi;
print $text;
Но здесь проблема в том, что менять будет не только между тегами pre
Что мешает сделать две выборки и приложением объеденить столбцы?
					
http://msdn.microsoft.com/workshop/author/dhtml/reference/constants/copy.asp
Copies the current selection to the clipboard