|
ru.perl- RU.PERL ---------------------------------------------------------------------- From : Andrey Titov 2:5020/400 20 Jan 2002 23:05:54 To : Andrey Titov Subject : Re: Как выделить из строки адрес электронной почты? -------------------------------------------------------------------------------- > Как выделить из строки адрес электронной почты? > > Строка такая: > $string = '<a href="mailto:aaa@host.ru">aaa</a> text <a href="mailto:bbb@host.ru">bbb</a>'; Пока ждал ответа сам придумал: while ($string =~ /<a\s+href=\"mailto:(.+?)\">\s*(.+?)<\/a>/ig) { print "<a href=\"mailto:$1\">$2</a><br>\n"; } --- ifmail v.2.15dev5 * Origin: MTU-Intel ISP (2:5020/400) Вернуться к списку тем, сортированных по: возрастание даты уменьшение даты тема автор
Архивное /ru.perl/9104bc9a3f47.html, оценка из 5, голосов 10
|