In Perl_Config.pm: Fixed the perl left/right brace matching problem. …

…The right brace now needs to be escaped similar to the left brace.

GMAO_etc/Perl_Config.pm

@@ -101,11 +101,14 @@ sub expand {
     #------------------------------------------
     foreach $var (@vars) {
 
-        ($varname = $var) =~ s/[\$\{\}]//g;
+        ($varname = $var) =~ s/\$//;   # remove '$'
+        $varname =~ s/\{//;            # remove '{'
+        $varname =~ s/}//;             # remove '}'
         $val_ENV  = $ENV{$varname};
         $val_eval = eval($var);
 
-        $var =~ s/([\$\{])/\\$1/;    # change '$' => '\$' and '{' => '\{'
+        $var =~ s/(\$)/\\$1/;          # change '$' => '\$'
+        $var =~ s/(\{)/\\$1/;          # change '{' => '\{'
 
         $strOUT =~ s/$var/$val_ENV/  if defined($val_ENV);
         $strOUT =~ s/$var/$val_eval/ if defined($val_eval);