Serialize und Deserialize perl DBI-Verbindungsobjekt

Question

Ich brauche ein Array mit DBI-Verbindungsobjekte zu teilen mit anderen Prozess mit Shared Memory serialisieren. Aber Deserialize funktioniert nicht.

Verwendung speicherbare qw/Frost Tauwetter /;

my @connections; 

for(my $c = 0;$c < 5;$c++) { 
    my $conn = DBI->connect($dsn,$user,$password,{'AutoCommit' => 1, 'RaiseError' => 1, 'PrintError' => 0}); 
    push(@connections,$conn); 
} 

my $shm = freeze(@connections); 
my $obj = thaw($shm); 

Return-Fehler: Globales Symbol

"$drh" requires explicit package name (did you forget to declare "my $drh"?) at (eval 33) line 6.

Answer 1

Sie können keine Datenbank-Handle/Verbindung serialisiert werden, da es von Benutzerraumdaten nicht erreichbar Storable (dh außerhalb Perl und in der Datenbank Bibliothek besteht und vielleicht auch in der TLS-Bibliothek) und auch Kerneldaten wie Dateideskriptoren.