foreach $schluessel (@g_POINewer) {
	print "Schluessel: ".$schluessel."\n";
	my @value = $g_POIRead{ $schluessel };
	print "Value0: ".@value(0)."\n";
	print "Value1: ".@value(1)."\n";
	print "Value2: ".@value(2)."\n";
	print "Value3: ".@value(3)."\n";
	print "Value4: ".@value(4)."\n";
}