替换第二次出现的日期字符串

时间:2016-12-06 09:33:40

标签: regex perl

圆括号中的日期第二次出现,(6.12.2016),应替换为空圆括号()

我尝试了以下内容:

my $dateoccurence = 2;

$content =~ s/(\(\d{2}\.\d{2}\.\d{4}\))/ --$dateoccurence == 0 ? "()" : $1 /ge;

1 个答案:

答案 0 :(得分:1)

数字不总是两个,只能有一个:

/(\(\d{1,2}\.\d{1,2}\.\d{4}\))/

或更短

/(\(\d\d?\.\d\d?\.\d{4}\))/