#40: 2022-01-06 やったこと

open System.IO
open System.Text

let filename = "sample.csv"
Encoding.RegisterProvider(CodePagesEncodingProvider.Instance)
let lines = File.ReadAllLines(filename, Encoding.GetEncoding("Shift_JIS"))

こういう感じで書けばよいようです。

  • csv の中でデリミタとしてのコンマ , と金額の桁区切りとしてのコンマ , の両方があったので桁区切りの方はいったん取り除くことにしました。
let removeComma str =

 Regex.Replace(str, @"((\d{1,3}),)?(\d{1,3}),(\d{3})", "$3$4")