[问题] 字串互换 sixth PTT批踢踢实业坊

[问题] 字串互换

楼主: sixth (冲向世界的最高峰) 2012-07-06 16:19:45

请问一个字串互换的问题举例如下:
$str = "Mary is a good girl. David is a bad boy!";
能不能用一行正规表示来做到这样的置换把good 和 bad 互换
$str = "Mary is a bad girl. David is a good boy!";
谢谢~

作者: blackkaku (black) 2012-07-06 22:49:00

很笨的方法：s/(.+?)(good)(.+?)(bad)(.+)/\1\4\3\2\5/g

作者: cutecpu (可爱中央处理器) 2012-07-06 23:38:00

s/(good|bad)/$1eq'good'?'bad':'good'/ge;

楼主: sixth (冲向世界的最高峰) 2012-07-09 09:31:00

谢谢~学到一个好方法

继续阅读

[问题] 远端登入页面问题程式码询问uuuuu1236 [问题] 资料撷取aattsat [情报]perl程式设计课程，大家可以参考哦！ fvaho123 [问卷]蓝色小舖会员知识分享行为之验证研究调查naozumi104 [请益] Perl socket nonblocking I/Oxatier [问题] 可以用#ifdef吗sixth Re: [问题] 关于socket 与 linux nc的问题saiamoi Re: [问题] 关于socket 与 linux nc的问题DarkKiller [问题] 关于socket 与 linux nc的问题saiamoi Re: [问题] array referenceDarkKiller