有没有一种方法可以用Perl管理进程(即,一个线程替换,它实际上可以工作)?

看一看 forks.pm ,这是一个“使用fork()替换Perl线程”的插件,它使内存使用更加合理(但不要在win32上使用它)。它将允许您声明“共享”变量,然后在进程之间自动传递对这些变量所做的更改(类似于threads.pm的工作方式)。

根据您的程序需要做什么,您可以考虑使用 POE 这是一个Perl框架,用于具有用户空间线程的多线程应用程序。它很复杂,但是很优雅和强大,通过将活动限制在单个Perl解释器线程上,可以帮助您避免非线程安全的模块。

开始使用的有用资源:

• Programming POE 马特中士的陈述(从这里开始了解它是什么和做什么)
• POE project page (许多食谱示例)

另外还有上百个预建的 POE components 您可以使用组装成应用程序。

您总是可以在父级和子级之间有一个管道来来回传递消息。

pipe my $reader, my $writer;
my $pid = fork();
if ( $pid == 0 ) {
    close $reader;
    ...
}
else {
    close $writer;
    my $msg_from_child = <$reader>;
    ....
}

不是一种非常舒适的编程方式,但它不应该是“不稳定的”。

从Perl5.8开始,您应该查看核心线程模块。看一看 http://metacpan.org/pod/threads

如果您想使用非线程安全的模块,通常可以在线程入口点内加载它们,并导入它们。