首先我不喜欢Perl

外貌党应该都更喜欢Python吧

不过工作中要用这个 没有办法

Perl以文本处理和强大的正则笑傲群雄

今天我同事却碰到了一个替换的问题来问我

他想把一段很长的文本中的一大段替换成另一段

而这三段已经分别在变量中了

因为很长 所以当然有很多正则的关键字啦

几乎没法用正则 一个一个转义太蛋疼了

我就帮他找字符串替换的办法

我一直自命特别擅长google

不过这是我最耻辱的一次

替换 字符串 replace 等各种关键字组合

出来的结果基本全是讲正则的

搜 字符串函数 这次结果好一点 结果内容里却没有找到替换函数……

在同事等不急我 自己写了个替换方法的时候

我终于在Perl教程里翻出来了

my $string = "Hello, world!";
substr($string, 0, 5) = "Goodbye"; 
# $string is now "Goodbye, world!"

这是多么诡异的语法啊……

虽然看着也有点那个意思

但是我还没有在其他各种语言里见到这样诡异的语法