Forum Webscript.Ru

Программирование => Perl => Тема начата: YYYn от 21 Октября 2002, 15:47:00

Название: Удаление ссылок
Отправлено: YYYn от 21 Октября 2002, 15:47:00

Во многих скриптах (в основном в форумах) видел такое явление, как автоматическое удаление ссылок из сообщений.
Забыл какой строчкой это можно сделать. Поможите, кто помнит, плз.

Название: Удаление ссылок
Отправлено: mike от 21 Октября 2002, 16:00:50

Ссылка - это или http:// ?

Название: Удаление ссылок
Отправлено: NeoNox от 21 Октября 2002, 16:34:52

$str_replase =~ s/http:\\/\\/[\\w,\\.,\\-,\\&,\\/,\\~]+//ig;

Название: Удаление ссылок
Отправлено: mike от 21 Октября 2002, 17:41:39

Цитировать

А ссылка - это смотря как ее описывать. Тегом или как обычно...:)

Название: Удаление ссылок
Отправлено: YYYn от 21 Октября 2002, 19:25:06

Цитировать

Ссылка - это или http:// ?

Это -

И в одном случае надо удалить только открывающий и закрывающий теги, а в другом ссылку целиком. Т.е.:

Ссылка: ля-ля-ля.
1. и удалить, а ля-ля-ля оставить.
2. Удалить все, вместе с ля-ля-ля.

Название: Удаление ссылок
Отправлено: NeoNox от 21 Октября 2002, 19:56:53

$str1 =~ s/\\(.*)\\<\\/a\\>//ig;
$str2 =~ s/\\(.*)\\<\\/a\\>/$3/ig;

вылавливаются href="bla... href=\'bla... href=bla...

Название: Удаление ссылок
Отправлено: mike от 21 Октября 2002, 20:21:01

Или так:

$str1 =~ s{(.*)}{}ig;
$str2 =~ s{(.*)}{$2}ig;

Название: Удаление ссылок
Отправлено: YYYn от 21 Октября 2002, 20:56:14

Цитировать

Или так:

$str1 =~ s{(.*)}{}ig;
$str2 =~ s{(.*)}{$2}ig;

Спасибо!!!