use Storable qw(lock_store lock_nstore lock_retrieve);
# aso ...
# oben im CGI

# Daten wie die letzte Änderung werden in einem Hash gespeichert, dass über den Storable bei jeden Aufruf gelesen und später vor der Ausgabe wieder geschrieben wird.
my $dynfilename = "oe2edit_dynamischeinfos.dat";
my %dynInfo = ('default' => 'default stuff');

my $dynhashref = lock_retrieve($dynfilename);
%dynInfo = %$dynhashref;
# aso ...
# kurz vor der Ausgabe, also am Ende dann

# Dynamische Infos über den Storable in Datei speichern.
# Das Hash wird in einer Storable gespeichert und am Anfang des Programms wird diese Datei wieder ausgelesen.
lock_store \%dynInfo, $dynfilename; # wo ist der Unterschied
lock_nstore \%dynInfo, $dynfilename; # zwischen den zwei?