在这个问答中，OP提到了从默认设置100调整递归深度的可行性。
有一些方法可以扩展此限制或完全关闭它......
warnings文档似乎没有说明如何实现这一点。
有没有办法在不关闭警告或求助于一些黑客$stack_level变量的情况下提高限制？
使用调试器：$DB::deep = 500;
没有调试器： 我只看到建议使用不同PERL_SUB_DEPTH_WARN宏重新编译perl二进制文件的参考
# disable 'Deep recursion on subroutine ...' warnings completely
no warnings 'recursion';