 |
|
Модераторы: korob2001, ginnie |
 
|
|
Регулярные выражения 
| s_a_s_h_a |
|
|||
 Опытный  Профиль Группа: Участник Сообщений: 261 Регистрация: 20.7.2004 Где: Петрозаводск Репутация: нет Всего: 1 |
Есть строка надо найти все что похоже на URL'ы и EMAIL'ы и заменить похожий URL на URL с http
Пример: $str="fhdkj site.my.ru jfdsdk [email protected] jfkjk http://site.my.ru dklsjk"; нужен результат: $str="fhdkj <http://site.my.ru> jfdsdk <[email protected]> jfkjk <http://site.my.ru> dklsjk"; Ничего не могу придумать.  Это сообщение отредактировал(а) s_a_s_h_a - 2.9.2004, 16:52 |
|||
|
||||
Загрузка ...
| s_a_s_h_a |
|
|||
|
Опытный Профиль Группа: Участник Сообщений: 261 Регистрация: 20.7.2004 Где: Петрозаводск Репутация: нет Всего: 1 |
По отдельности получилось, а вот вместе пока нет
$str =~ s/\s(([\w_\.\-])+\@(([\w\-])+\.)+([\w]{2,4}))\s/ \<$1\> /g; $str =~ s/\s((([\w_\-0-9])+\.)+([\w_\-0-9])+)\s/ \<$1\> /g; $str =~ s/\s((http:\/\/)(([\w_\-0-9])+\.)+([\w_\-0-9])+)\s/ \<$1\> /g; Добавлено @ 17:18 Оказывается их надо просто друг за другом расположить.  |
|||
|
||||
| Chuck |
|
|||
 Сушня Профиль Группа: Эксперт Сообщений: 442 Регистрация: 12.12.2003 Где: Узбекистан, Ташке нт Репутация: нет Всего: 9 |
Так я не понял ты решил проблему???
Если да, закрывай тему!! А то я не прочитав, полез в Справочник RegExp ))) |
|||
|
||||
| s_a_s_h_a |
|
|||
|
Опытный Профиль Группа: Участник Сообщений: 261 Регистрация: 20.7.2004 Где: Петрозаводск Репутация: нет Всего: 1 |
Да решил. Я на форумах недавно. Почитал правила, но нигде не нашел, что надо закрывать тему и
как это делать. Кстати, для поиска URL'ов нужно внести небольшую корректировку $str =~ s/\s((([\w_\-0-9\/~])+\.)+([\w_\-0-9\/~])+)\s/ \<$1\> /g; $str =~ s/\s((http:\/\/)(([\w_\-0-9\/~])+\.)+([\w_\-0-9\/~])+)\s/ \<$1\> /g; А почитать никогда не вредно. |
|||
|
||||
| ElectricalStorm |
|
|||
 Опытный Профиль Группа: Участник Клуба Сообщений: 547 Регистрация: 22.1.2004 Репутация: нет Всего: 9 |
Это точно . -------------------- Нужно знать инструмент, которым пользуешься |
|||
|
||||
|
|
| Правила форума "Perl" | |
|
|
Если Вам понравилась атмосфера форума, заходите к нам чаще! С уважением, korob2001, sharq. |
| 0 Пользователей читают эту тему (0 Гостей и 0 Скрытых Пользователей) | |
| 0 Пользователей: | |
| « Предыдущая тема | Perl: Общие вопросы | Следующая тема » |
[ Время генерации скрипта: 0.0537 ] [ Использовано запросов: 22 ] [ GZIP включён ]
Реклама на сайте Информационное спонсорство
|
|
По вопросам размещения рекламы пишите на vladimir(sobaka)vingrad.ru
Отказ от ответственности Powered by Invision Power Board(R) 1.3 © 2003 IPS, Inc. |