s/^((?i:ORACLE_SID|ORACLE_HST_SID|ORACLE_HOME|SDP_HOME))(?==)/(my $lhs=$1) =~ tr:_:.:; $lhs/e for @envArray;