ru.perl
- RU.PERL ----------------------------------------------------------------------
From : Anatoly Moskovsky 2:5020/400 23 Aug 2000 17:49:31
To : All
Subject : Сопоставление со скобками
--------------------------------------------------------------------------------
Привет!
Есть строка такого вида
$text = "
(
bbbb
(aaaa)
(
(bbb)
(eeee)
)
vvv
)
(sss)
(ffff)";
Hужно составить регэксп который выделяет верхний уровень скобок:
@a = $text =~ /нечто/;
В результате @a = ("bbbb(aaaa)((bbb)(eeee))vvv", "sss", "ffff")
Возможно ли это при неограниченном уровне вложенности скобок?
А при заранее заданном максимальном?
Заранее спасибо.
Бай
--- ifmail v.2.15dev5
* Origin: Demos online service (2:5020/400)
Вернуться к списку тем, сортированных по: возрастание даты уменьшение даты тема автор
|
