my %config = ();
my $sth = $dbh->prepare("SELECT * FROM event_config") or die $dbh->errstr;
$sth->execute() or die $dbh->errstr;
$config{$key} = $wert while my ($key,$value) = $sth->fetchrow_array();