|
ru.perl
- RU.PERL ----------------------------------------------------------------------
From : Sergei Lesin 2:5052/5.14 17 Aug 2000 08:45:06
To : Alexander Bolotnov
Subject : навеяло (regex)
--------------------------------------------------------------------------------
В Четвеpг 17 Августа 2000 г. в 00:25, you wrote to All:
AB> вот такое дело, тут спрашивали кое-что про разные штуки и я сел
AB> думать, про то, как бы регексом сделать вот что: имеем строку, из
AB> которой надо удалить все и оставить только то, что заключено в '< >'
AB> вроде такого:
AB> $wd = "blah hehe here is <doffi trying> to make a <to kewl> of a
AB> prog!";
AB> $wd =~ s/.*?(<.*?>).*?/$1/g;
$wd=~s/[^<]*(<[^>]*>)[^<]*/$1/g;
AB> print $wd;
Sergei
--- GoldED/W32 3.0.1
* Origin: Тяжело в лечении - легко в раю! (2:5052/5.14)
Вернуться к списку тем, сортированных по: возрастание даты уменьшение даты тема автор
|
навеяло (regex) 
