SIEBDB = DISK:\db2_backup\ SIEBDB = USEREXIT #### $preprod->{$siebdb} = "DISK:\db2_backup\"; $prod->{$siebdb} = "USEREXIT"; #### if($preprod->{$siebdb} != $prod->{$siebdb}){ print "NOT EQUAL" } else{ print "EQUAL"; }
## $preprod->{$siebdb} = "DISK:\db2_backup\"; $prod->{$siebdb} = "USEREXIT"; ##
## if($preprod->{$siebdb} != $prod->{$siebdb}){ print "NOT EQUAL" } else{ print "EQUAL"; }