Хотя туплю... Это всего лишь парсинг выражения со скобками. Причём нужно
взять только первый уровень.

Считай скобки, в общем. :)
On 11 Jun 2011 09:17, "Aleksander Gorohovski" <[email protected]>
wrote:
> On Sat, 11 Jun 2011 10:13:44 +0300, Andrei wrote:
>
>> Тогда забыть про регэкспы. Это почти как парсинг html -- в общем случае
>> регэкспами не парсится.
>
> предчувствие --- что должно рекурсивно.
> Regexp-Common работает же.
>
>> On 11 Jun 2011 09:11, "Aleksander Gorohovski"
>> <[email protected]>
>> wrote:
>>> On Sat, 11 Jun 2011 10:03:11 +0300, Andrei wrote:
>>>
>>>> @str = map { $_ . '{' } grep {defined $_} split /{/, $str;
>>>>
>>>> Как-то так...
>>>
>>> К сожалению не всё так просто,
>>> в 'any symbols' of $str могут быть вложенные парные
>>> фигурные скобки {}
>>> :(
>>> т.е.
>>> $str = '{any {symbols}}{{any} symbols}1...'
>>>
>>> out:
>>> {any {symbols}}
>>> {{any} symbols}1
>>> ...
> --
> Moscow.pm mailing list
> [email protected] | http://moscow.pm.org
-- 
Moscow.pm mailing list
[email protected] | http://moscow.pm.org

Ответить