我有一个let a = ["q0,x";"q1,y"];
类型为 的列表string list
。
我想让它成为[("q0","x");("q1","y")];
一个(string * string)
元组列表。
我怎么做??
您可以使用模块Str和功能split
:
let split =
List.map (fun str ->
match Str.split (Str.regexp ",") str with
| a :: b :: _ -> a, b
| _ -> assert false (* should not happen *))