if($preprod->{$siebdb} != $prod->{$siebdb}){
print "NOT EQUAL" 
}
 else{
print "EQUAL";
}