|
|
ru.perl- RU.PERL ---------------------------------------------------------------------- From : Alexander Goryachkin 2:5020/400 26 Mar 2003 18:29:18 To : Vladimir Podgorny Subject : Re: $str --------------------------------------------------------------------------------
Vladimir Podgorny wrote:
> Упрощенно вот так:
>
> (my $email) = $str =~ /mailto:(.+?\@[\.\-[:alnum:]]+)/;
>
Сенкс
Вот так работает правельней
/mailto:(.+?\@[\w*\.\-]+)/
--
ag@kccs.ru
http://www.kccs.ru
--- ifmail v.2.15dev5
* Origin: RCCS (2:5020/400)
Вернуться к списку тем, сортированных по: возрастание даты уменьшение даты тема автор
Архивное /ru.perl/53238576212c.html, оценка из 5, голосов 10
|