perl - Perl 的 Parse::RecDescent 线程安全吗？

Question

我有一个 Web 应用程序，它使用通过 Parse::RecDescent 创建的解析器。应用程序的多个部分都需要一个解析器对象，并且由于解析器占用相当多的内存，我到目前为止将解析器对象视为一个单例。这在纯 CGI 环境中运行良好，因为同一个对象一次只解析一个表达式。但是，我不确定在同一对象解析器同时解析多个字符串的环境中运行时，这是否仍然有效。

例如，如果我尝试在 FastCGI 下运行应用程序，如果两个请求同时使用相同的解析器对象来解析不同的字符串，是否会成为问题？

如果需要，我可以更改应用程序，使解析器不再是单例，但我不希望这样做，因为当前的解决方案更简单。

Answer 1

据我所知，FastCGI 不使用 Perl 线程，而是使用进程。因此，您应该是安全的。

此外，如果您正在使用 Perl 线程和 Parse::RecDescent，您很可能从不使用同一个对象同时解析不同的东西。伪代码:

use threads;
use Parse::RecDescent;
our $SingletonRD = Parse::RecDescent->new($grammar);

my @threads = map {threads->new(\&thread_loop)} (1..5);

sub thread_loop {
    $SingletonRD->parse($text);
}

这是一个在单例之后创建线程的例子。这是发生了什么:

• 您创建单例对象并将其存储在 $SingletonRD 中。
• 您创建(在一个循环中)五个线程。生成新线程时，perl 会
  • 创建全局符号表的副本。这包括所有包变量和子例程。
  • 创建各种 perl 解释器内部数据结构的副本(OP 树除外)。

这有效地为每个线程克隆了一次 $SingletonRD。没有保存内存。现在，如果您仅在创建线程后设置解析器，变量将不会在它们之间共享，因此不会节省内存并且这里也没有线程不安全。

原则上可以使用threads::shared在线程间共享数据。但这并不(容易)适用于对象和复杂的嵌套结构。因此，对于 Parse::RecDescent 解析器来说，这可能是不可能的。

PS:看看 Parse::Yapp 或更好的 Parse::Eyapp。它们(在算法上)比 Parse::RecDescent 快得多，我直觉上说它们甚至可能使用更少的内存。