正则表达式问题!

dimitq

1^# dimitq 发表于 2008-07-24 14:24

在一个文件中，有若干单词fred,和若干单词wilma.如何用正则使2个单词互换?
一条指令可以吗?
谢谢！

cobrawgl

2^# cobrawgl 发表于 2008-07-24 14:55

s/(fred|wilma)/($1 eq 'fred') ? 'wilma' : 'fred'/ge;

没测试啊

dimitq

3^# dimitq 发表于 2008-07-24 15:09

好像不行！！！

cobrawgl

4^# cobrawgl 发表于 2008-07-24 15:17

s/\b(fred|wilma)\b/($1 eq 'fred') ? 'wilma' : 'fred'/mge;

这样呢，要不你发点样本来看看

hfahe

5^# hfahe 发表于 2008-07-24 15:19

可以的～～～

dimitq

6^# dimitq 发表于 2008-07-24 15:20

你可以直接$_="fred&wilma"进行测试。
关键是($1 eq 'fred') ? 'wilma' : 'fred'被当成了字串。

hfahe

7^# hfahe 发表于 2008-07-24 15:22

e修饰符不是表示了替代字符是个表达式吗没加？

dimitq

8^# dimitq 发表于 2008-07-24 15:24

厉害，刚学perl太不熟悉了。呵呵。
搞定了。

guijia8427

9^# guijia8427 发表于 2008-07-24 15:26

恩这个写法很强大

cobrawgl

10^# cobrawgl 发表于 2008-07-24 15:28

第一种没加 \b 不太合适
还是加上好