validation - Haskell:检查字符串是否为有效数字

Question

检查字符串是否为有效数字时如何检查小数点？

我在想的是我使用类似下面的东西，但是添加代码来检查小数点!

isNumber :: String -> Bool
isNumber xs = all isDigit xs || add extra code here

在 EBNF 中将有效数字定义为:

number -> .digit+ | digit+ [ .digit*]

例如，.5, 1.5, 1, 1. 都是有效数字。 +
表示出现一次或多次，* 表示出现零次或多次。

Answer 1

一个简单的方法是使用 readMaybe用于将字符串转换为数字，

import Text.Read

等检查它是否是 Double ,

readMaybe "123" :: Maybe Double
Just 123.0

readMaybe "12a3" :: Maybe Double
Nothing

后者返回 Nothing ，字符串不是有效数字。以类似的方式，如果我们假设它是 Int ,

readMaybe "12.3" :: Maybe Int
Nothing