构建 Perl 正则表达式来匹配数据

Question

请帮我建立一个正则表达式。

我有很多关于此类项目的数据：'01。项目1'， '02.项目3'， '3D 项目'， '下一个项目'， ...

我需要构建一个正则表达式，将其规范化为以下内容："项目1"、"项目3"、"3D 项目"、"下一个项目"，...;

我已经尝试了下一个正则表达式，但它将"3D 项目"剪切为"D 项目"： $item =~ s/^( [d.s]* (?=[a-zA-Z]) )? //x ;

Answer 1

尝试以下正则表达式：

$item =~ s/^d+.s*//;

正则表达式101演示