# weiter oben:
my %numOfMessages;
...
#print "TEST: $DBusZF\n";
$numOfMessages{ $DBusZF } += 50;