Programmieren mit Perl

Sichern von Datenstrukturen

Wenn Sie Ihre Datenstrukturen sichern wollen, um sie später von einem anderen Programm aus wieder zu nutzen, dann gibt es verschiedene Möglichkeiten. Die einfachste Lösung bildet das Perl-Modul Data::Dumper, das eine (auch selbstreferenzierende) Datenstruktur in einen String umwandelt, der extern gesichert und später mit eval oder do wiederhergestellt werden kann.

use Data::Dumper;
$Data::Dumper::Purity = 1;       # weil %TV sich selbst referenziert
open (FILE, "> tvinfo.perldata") or die "can't open tvinfo: $!";
print FILE Data::Dumper->Dump([\%TV], ['*TV']);
close FILE                       or die "can't close tvinfo: $!";

Ein anderes Programm (oder das gleiche) kann die Datei dann später wieder wie folgt einlesen:

open (FILE, "< tvinfo.perldata") ...