Wie kann ich eine Datenbankverbindung über einen gegabelten Prozess in Perl teilen?

Question

Ich habe die folgenden Programme in Perl vor:

my $db = DBconnection with DB2

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

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

Ich dachte, dass es für das Ende des Kindes Prozess wartete, es zu tun haben wollte und es für die DB durch ein pro-Verfahren arbeiten würde.

Darüber hinaus ist DB nicht auf den Inhalt des Fehlers verbunden.

Was ist los?

Answer 1

Es gibt eine Menge Dinge, die Sie tun müssen, ein Kind-Prozess zu ermöglichen, seine Eltern DBI Griff zu verwenden. Lesen Sie diesen Artikel auf Perl Monks über DBI, Gabel und klonen .

Answer 2

Versuchen mit dieser Codezeile in Ihrem Kind Block:

$db->{InactiveDestroy} = 1;