[Moscow.pm] parsing {string}{string} Regexp-Common etc.

[Aleksander Gorohovski]

On Sat, 11 Jun 2011 13:04:44 +0300, Ivan Petrov wrote:

>>>> Сейчас через Regexp::Common делаю так:
>>>
>>>> my @f = /$RE{balanced}{-parens=>'{}'}/g;
>>>
>>> какой-то изврат
>
>> Не согласен.
>
> зря.
>
>> 'any symbol' --- могут быть \w \d, а также
>> парные сочетания скобок ()[]{} и вложенные тоже
>> :)
>
> этого в исходном задании не было. ну да ладно.

any symbol --- любой символ(ы) (дословно)

> тогда как-нибудь так:
>
>     /( \{ (?>[^{}]*) (?:\}\d*|(?1) \} \d*) )/gx;

Увы,
тяп-ляп, абы как не проходит:

Sequence (?1...) not recognized in regex; marked by <-- HERE in m/( \{  
(?>[^{}]*) (?:\}\d*|(?1 <-- HERE ) \} \d*) )/