3v4l.org

run code in 300+ PHP versions simultaneously
<?php $pattern="\( ( (?>[^()]+) | (?R) )* \)"; $str="(def a (x) (+ 1 x))(print (a 1))"; var_dump(preg_grep(pattern,str));

preferences:
35.38 ms | 402 KiB | 5 Q