|
|
ru.perl- RU.PERL ---------------------------------------------------------------------- From : Artur Penttinen 2:5020/400 26 Mar 2003 18:30:20 To : Alexander Goryachkin Subject : Re: $str -------------------------------------------------------------------------------- On Wed, 26 Mar 2003 13:51:02 +0000 (UTC) Alexander Goryachkin <devel@rccs.spb.ru> writes to all: AG> Hi All! AG> Hапример есть разные строки содержащие email: mailto:user@domain> AG> mailto:user@domain > "mailto:user@domain" > AG> надо выдярнуть только мыльный адрес, меньшей писаниной кода. AG> я делаю это так: if($str =~ /mailto:/){ $str = $'; if($str =~ AG> /"/){ $str = $`; ... и так далее } } AG> как это упростить? if ($str =~ m|mailto:([^@]+@[a-z0-9.-]+)|) ... wbw,artur (Adar II 22, 5763) spamtrap: artur+trap@ptc.spbu.ru (not for mail!) -- Аэробусы - занимающиеся аэробикой. --- ifmail v.2.15dev5 * Origin: sonera ncs ltd (2:5020/400) Вернуться к списку тем, сортированных по: возрастание даты уменьшение даты тема автор
Архивное /ru.perl/114899317a30c.html, оценка из 5, голосов 10
|