Perlの分岐した子からデータベースを照会できないのはなぜですか？

Question

私はPerl fork managerとDBIを試しました。 しかし、エラーが発生しましたDBD :: mysql :: stの実行に失敗しました：クエリ中にMySQLサーバーへの接続が失われました。ここで

サンプルコード：私は高い値に低いとのクエリ（私はint型の10Kレコードをスピッティングしている）

use Parallel::ForkManager; 
my $pm = new Parallel::ForkManager(50); 
my $db = krish::DB->new or die $!; # its has all connection details 
while ($low < $high ) { 
    # Some value manipulation 

    my $pid = $pm->start and next; 
    #db_execution returns execution 
    while (my $sth = db_execution ($db, $low , $high)) { 
     ... 
     #fetch row operation 
     ... 
    } 
    $pm->finish; 
} 

sub db_execution { 
    ... 
    my $dbh = $db->connect('students') or die $!; 
    my $sth = $dbh->prepare($sql) or die "$!:" . $dbh->errstr; 
    $sth->execute or die "$!:" . $sth->errstr; 
    ... 
} 

同じコードが出て並列処理で実行されていることを確認します。どうした？ 解決方法これはですか？

Answer 1

プロセス間でデータベース接続を共有する場合（フォークを使用している場合）、あるプロセスが他のプロセスの下からそれを閉じないようにする必要があります。接続も変数であるため、Perlインタープリタがシャットダウンすると、そのオブジェクトのDESTROYメソッドが呼び出されます。この場合、この場合は接続が閉じられます。

したがって、子プロセスが終了してシャットダウンしたときに子プロセスが終了すると、プロセスは親プロセスのプロセスから終了します。これを防ぐ方法は、フォークの前に親プロセスでInactiveDestroyをtrueに設定し、完了したら親で明示的に接続を閉じることです。

https://metacpan.org/pod/DBI#InactiveDestroy

Answer 2

あなたはすべての子プロセスで同時に同じDBハンドルを使用してトラブルを求めています。それぞれの子に新しい接続を作成する必要があります。

心配しないでください...私はコードの残りの部分を読んでいます。