注册Ex以匹配数字和逗号

RH.*_*RH. 1 regex perl

我有一个.csv文件,我只对逗号分隔整数的行感兴趣:

23,2,4,56,78,9,4,6
Run Code Online (Sandbox Code Playgroud)

一行中逗号分隔值的数量应大于5(或其他).

我在perl做这个.

Wel*_*bog 11

/^(\d+,){4,}\d+$/
Run Code Online (Sandbox Code Playgroud)

匹配一组数字,后跟逗号.数字逗号对被视为一个组,其本身必须至少重复四次.然后匹配序列中不需要后跟逗号的最后一个数字.

如果您不需要捕获数字,请使用非捕获组(将略微加快速度):

/^(?:\d+,){4,}\d+$/
Run Code Online (Sandbox Code Playgroud)