perl - 如何在 Perl 的分叉进程中共享数据库连接？

Question

我之前在 Perl 中制作了以下程序：

my $db = DBconnection with DB2

if ($pid = fork()) {
    #parent
} else {
    #child
    $db->execute("SELECT ****");
    exit;
}

wait();
$db->execute("SELECT ****");

我认为它等待子进程的结束想要这样做，并会通过一个亲进程为 DB 操作它。

另外，DB没有连接到内容的错误。

怎么了？

Answer 1

要让子进程使用其父进程的 DBI 句柄，您必须做很多事情。请参阅 Perl Monks 上关于DBI、fork 和 clone的这篇文章。

Answer 2

尝试在您的子块中包含这行代码：

$db->{InactiveDestroy} = 1;