>>> Сейчас через Regexp::Common делаю так:
>>
>>> my @f = /$RE{balanced}{-parens=>'{}'}/g;
>>
>> какой-то изврат
> Не согласен.
зря.
> 'any symbol' --- могут быть \w \d, а также
> парные сочетания скобок ()[]{} и вложенные тоже
> :)
этого в исходном задании не было. ну да ладно.
тогда как-нибудь так:
/( \{ (?>[^{}]*) (?:\}\d*|(?1) \} \d*) )/gx;
--
Moscow.pm mailing list
[email protected] | http://moscow.pm.org
