正则表达式-正则匹配lisp的list
对于代码：
(def a (x) (+ 1 x))
(print (a 1))
如果你对这篇内容有疑问，欢迎到本站社区发帖提问 参与讨论，获取更多帮助，或者扫码二维码加入 Web 技术交流群。
绑定邮箱获取回复消息
由于您还没有绑定你的真实邮箱，如果其他用户或者作者回复了您的评论，将不能在第一时间通知您！
对于代码：
(def a (x) (+ 1 x))
(print (a 1))
由于您还没有绑定你的真实邮箱，如果其他用户或者作者回复了您的评论，将不能在第一时间通知您！
接受 或继续使用网站，即表示您同意使用 Cookies 和您的相关数据。
发布评论
评论（1）
理论上：匹配嵌套括号需要上下文无关文法，正则文法是干不了这事的。
实践上：一次遍历记录左右括号次数不就搞定了吗，别折腾什么正则表达式。
真答案：(((?>[^()]+)|(?R))*)，见递归模式。
<?php
$pattern="/(((?>[^()]+)|(?R))*)/";
$str = <<< LOL
(def a
(x) (+ 1 x))
(print (a 1))
LOL;
preg_match_all($pattern,$str,$out);
var_dump($out[0]);
输出：
array(2) {
[0] => string(21) "(def a
(x) (+ 1 x))"
[1] => string(13) "(print (a 1))"
}