let IntAndString value =
let (|Match|_|) pattern input =
let m = Regex.Match(input, pattern) in
if m.Success then Some ([ for g in m.Groups -> g.Value ]) else None
match value with
| Match "(\d+)(\w+)" x -> x
| Match "(\w+)" x -> x
| Match "(\d+)" x -> x + "MY VALUE"
| _ -> List.Empty
如何在字符串列表中添加字符串?
答案 0 :(得分:2)
您可以使用@
运算符附加到列表中。此运算符将两个列表连接在一起,因此您必须将要添加的元素包装在其自己的列表中,如下所示:
| Match "(\d+)" x -> x @ ["MY VALUE"]
答案 1 :(得分:2)
您还可以使用列表构造函数::
。如果前置而不是追加是好的:
| Match "(d\+)" x -> "MY VALUE" :: x