F＃伤害了我的大脑......任何人都可以帮助将C＃翻译成F＃吗？

Question

我发现了一个我认为非常适合学习F＃的快速项目。 然而，由于某种原因，我无法将我的大脑包裹起来。 经过几个小时的教程，甚至一些电影，我仍然只是......不明白。

所以我想使用Enterprise Manager“Generate Scripts”开始在工作中对我们的存储过程进行版本控制，并希望删除脚本日期。 我放弃了，并在C＃中做到了，但现在我真的很好奇，我希望有一些见解。

我不是空手而归，这是我的C＃代码：

string path = @"C:\Subversion\CompanyName\SQL\DBName";
string fileSpec = "*.sql";
string pattern = @"Script Date: \d{2}/\d{2}/\d{4} \d{2}:\d{2}:\d{2}";
string replace = "Script Date: ";

foreach (var file in Directory.EnumerateFiles(path, fileSpec))
{
    string content = File.ReadAllText(file);

    content = Regex.Replace(content, pattern, replace);

    File.WriteAllText(file, content, Encoding.Unicode);
}

我猜在F＃中有一些很酷的2-3线解决方案...我很乐意看到它。

Thx的提示！ 我更新了它以匹配下面的内容，使视觉比较更具启发性。 下面还有很棒的评论。

Answer 1

let path = @"C:\Subversion\CompanyName\SQL\DBName"
let fileSpec = "*.sql"
let pattern = @"Script Date: \d{2}/\d{2}/\d{4} \d{2}:\d{2}:\d{2}"
let replace = "Script Date: "

Directory.EnumerateFiles (path, fileSpec)
|> Seq.iter (fun file ->
    let content = Regex.Replace (File.ReadAllText file, pattern, replace)
    File.WriteAllText (file, content, Encoding.Unicode))

请注意，您的C＃代码是 （ 编辑 ：WAS）也远远超过必要的繁琐。

Answer 2

您需要做的就是使用let关键字替换变量声明中的类型名称（可以在C＃中编写var ），删除所有分号和花括号，并将foreach替换为
for file in files do 。 您还使用了一些名称空间，因此在F＃中，您需要以下内容：

open System.IO
open System.Text.RegularExpressions

你正在使用一个可变变量（ content ），但你真的不需要改变它。 您可以使用其他变量（例如newContent ）来存储替换结果。 所以，中间部分将是：

let content = File.ReadAllText(file)  // No need for a stream reader here!

let pattern = @"Script Date: \d{2}/\d{2}/\d{4} \d{2}:\d{2}:\d{2}"
let replace = "Script Date: "    
let newContent = Regex.Replace(content, pattern, replace)

您也可以使用相同的变量名称，这意味着您将声明一个新的（不可变的）变量，该变量会隐藏范围其余部分中的前一个变量（ 有关详细信息，请参阅此SO答案 ）

即使发生异常，我也会改变最后一位（即使在C＃中！）来关闭流。 在C＃中，你可以使用using 。 要在F＃中编写相同的内容，可以使用use关键字：

use fileStream = new FileStream(file, FileMode.Truncate, FileAccess.Write, FileShare.None)
use writer = new StreamWriter(fileStream, Encoding.Unicode)
writer.Write(content)
writer.Flush()

use关键字确保当对象超出范围时（也就是在for循环迭代结束时（在这种情况下））处置（关闭）对象。

Answer 3

不重要的。 编译。 在Reflector中打开。 选择反编译语言为F＃。