$preprod->{$siebdb} = $k;
#$k is /siebprod/db13/PRODDB/log2/ 
$prod->{$siebdb} = $j;
# $j is /preprod/db12/PREPRODDB/log2/