my @envArray = `rsh sdp1 su - oracle8 -c env `; my $i = 0; my @array; foreach(@envArray) { if($_ =~ (/^(ORACLE_SID)\=(.*)/i)|(/(ORACLE_HST_SID)\=(.*)/i)|(/(ORACLE_HOME)\=(.*)/i)|(/(SDP_HOME)\=(.*)/i)) { my $temp = lc($1); #$temp = s|_|.|; $array[$i] = "$temp=$2\n"; $i++; }