Select Code to Download

open (RM3DFile, ">",  $fullFileName ) ||  die("Could NOT open " . $ful
+lFileName  . "\n");  
...
   print  RM3DFile    "DATEFORMAT=YYYYMMDD\n";
   print  RM3DFile    "DECIMALSEPARATOR=. \n";
}

open (RM3DFile, ">",  $fullFileName ) ||  die("Could NOT open " . $ful
+lFileName  . "\n");  
...
   print  $_[0]   "DATEFORMAT=YYYYMMDD\n";
   print  $_[0]   "DECIMALSEPARATOR=. \n";
}