perl(1) 匹配数字

以下是常用的用来匹配数字的正则表达式：

/D/;                          # 匹配非数字字符，即如果匹配成功，则目标字符串无数字字符
/^d+$/;                       # 匹配不带符号的整数
/^-?d+$/;                     # 匹配除带+号以外的整数
/^[+-]?d+$/;                  # 匹配整数
/^-?d+.?d*$/;               # 匹配不是以.开头的小数
/^-?(?:d+(?:.d*)?|.d+)$/; # 匹配小数
/^([+-]?)(?=d|.d)d*(.d*)?([Ee]([+-]?d+))?$/; # 匹配浮点数

D代表非数字字符，d相反，他们分别还可以以[^0-9]和[0-9]的形式表示。

以组的形式（）进行匹配时，如果在括号开头加?:则不会记录匹配数据，否则会以$[1...]（$1, $2,$3...)或[1...]（和sed一样）的形式对组里匹配的数据，如果进行匹配的数据量大的话，那么这样将极大的降低内存的使用。

通常以？=（匹配）和？！（不匹配）进行零宽断言，即以这两种形式匹配的数据不会记录在匹配数据$&中。

下面的链接详细介绍了perl正则表达式

点击打开链接