$braces = qr/(?<braces>\{ ([^\{\}] | (?&braces))*? \} )/x;