Исходное сообщение
"Регулярные выражения." Отправлено Etch, 08-Авг-11 14:26
> У меня такой вопрос. > Есть строка $string. В ней есть обязательно ссылка. Я пытаюсь проверить, если > в этой ссылке url не равен site.com, то вставить target=_blank в > <a target="blank" href="http://other-site.com/"> . > Заранее благодарен. $ echo '123 666 <a href="http://other-site.com/">yes</a> 45666 ttttt <a href="http://site.com/">no</a>, and <a href="http://3-site.com/">yes</a>.' | perl -nE 's@(<a\s+)(href="?http://(?!site.com).*?"?>)@$1target="_blank" $2@gi; print;' 123 666 <a target="_blank" href="http://other-site.com/">yes</a> 45666 ttttt <a href="http://site.com/">no</a>, and <a target="_blank" href="http://3-site.com/">yes</a>.

Ваше сообщение
Имя*:
EMail:	Для отправки новых сообщений в текущей нити на email укажите знак ! перед адресом, например, !user@host.ru (!! - не показывать email). Более тонкая настройка отправки ответов производится в профиле зарегистрированного участника форума.
Заголовок*:
Сообщение*:	>> У меня такой вопрос. >> Есть строка $string. В ней есть обязательно ссылка. Я пытаюсь проверить, если >> в этой ссылке url не равен site.com, то вставить target=_blank в >> <a target="blank" href="http://other-site.com/"> . >> Заранее благодарен. > $ echo '123 666 <a href="http://other-site.com/">yes</a> 45666 ttttt <a href="http://site.com/">no</a>, > and <a href="http://3-site.com/">yes</a>.' | perl -nE 's@(<a\s+)(href="?http://(?!site.com).*?"?>)@$1target="_blank" > $2@gi; print;' > 123 666 <a target="_blank" href="http://other-site.com/">yes</a> 45666 ttttt <a href="http://site.com/">no</a>, > and <a target="_blank" href="http://3-site.com/">yes</a>.
	Введите код, изображенный на картинке: