#my $dynamicinfos_Obj = new Config::Simple() or die Config::Simple->error(); my $dynamicinfos_Obj = Config::Simple->import_from($config{'dynamicinfos_file'}, \my %dynamicinfos); #$dynamicinfos_Obj->read($config{'dynamicinfos_file'}) or &fehlerbehandlung("Bitte legen Sie eine Datei $config{'dynamicinfos_file'} an!!! ".$dynamicinfos_Obj->error()." In Line ".); #$dynamicinfos_Obj->read($config{'dynamicinfos_file'}) or die "Bitte legen Sie eine Datei $config{'dynamicinfos_file'} an!!! ".$dynamicinfos_Obj->error(); #%dynamicinfos = $dynamicinfos_Obj->vars(); $dynamicinfos_Obj->autosave(1); print "last update: $dynamicinfos{'lastupdate_stamp'}
\n"; # geht nicht print "stamp: ".$dynamicinfos_Obj->param("lastupdate_stamp")."
\n"; # geht!!!