in reply to Re^2: pattern match showes true
in thread pattern match showes true

$siebdb = 'somekey'; $preprod->{$siebdb} = "DISK:\\db2_backup\\"; $prod->{$siebdb} = "USEREXIT"; if($preprod->{$siebdb} ne $prod->{$siebdb}) { print "NOT EQUAL"; } else { print "EQUAL"; }

outputs

NOT EQUAL

You should be getting the same.