正则替换的使用

V2EX = way to explore

V2EX 是一个关于分享和探索的地方

现在注册

已注册用户请登录

这是一个创建于 3375 天前的主题，其中的信息可能已经有所发展或是发生改变。

如何将驼峰式的注解字段通过正则替换成下划线的字段,而不影响到其他的驼峰式命名的方法或变量？
eg:
@Column (name="lastUpdateDate")//如何替换成 @Column (name="LAST_UPDATE_DATE")
public Date getLastUpdateDate (){
return lastUpdateDate;
}

字段

替换

name

驼峰式

5 条回复 • 2015-08-22 23:08:29 +08:00

flowfire

2015-08-20 22:04:56 +08:00

断言。。。。吧

joyeblue

2015-08-20 22:21:03 +08:00

这个一个针对例子的可用 perl 正则。
$subject =~ s/(@Column\s+$name=")([a-z]+)?([A-Z][a-z]+)?([A-Z][a-z]+)?"$/$1\U$2_\U$3_\U$3"\)/g;

当然 name 中的注解单词可能会有长有短，如果有 4 个单词的话继续添加([A-Z][a-z]+)?然后在替换的地方对应添加_\U$4 即可，超 4 个单词依次继续添加即可。

javasharp

2015-08-22 16:07:33 +08:00

@joyeblue 感谢回答。。不过，字段很多，有长有短，这样写法，似乎不太妥。

javasharp

2015-08-22 16:11:17 +08:00

Find: (?<=")(\w*)([A-Z])([a-z]+)(\w*)(?=")
Replace: $1_\U$2$3$4
一直重复以上替换操作，直至全部替换完毕

最后，删除字段前的下划线
Find: (?<=")_(\w+)(?=")
Replace: $1

也没有想出更优雅的做法，就这样了。

joyeblue

2015-08-22 23:08:29 +08:00

@javasharp 更优雅的做法，就是先匹配，然后从后到前逐个判断$4,$3,$2,$1 是否存在，分别做处理即可。