正则表达式达人帮忙解析语法

sellie

perl –pi.bak –e ‘s/(_CHIN[AE])(\d+)/$1@{[$2+52]}/’  test.txt

运行前 test.txt
_CHINA1
_CHINA2
_CHINA3
_CHINE1
_CHINE2
_CHINE3

运行后 test.txt
_CHINA53
_CHINA54
_CHINA55
_CHINE53
_CHINE54
_CHINE55

对替换中的@{[$2+52]}非常的不解.  @, {}, [] 的作用是什么.
另外替换中需要计算$2+52, 为什么不用s///e的.
希望perl 正则表达式达人解惑. 谢谢

yiten

@{[。。。]}是perler经常使用的一种技巧，你会遇到的

liyangole

回复 2# yiten


    呵呵，好人做到底，帮忙讲解一下呗。

yiten

回复 2# yiten


你也可以用e，perl的特点就是你有很多方法可以实现嘛
@{[...]}可以使得perl强制对...进行运算，而不是当做一个字符串直接打出来。你有时可能想方便的在字符串内插方法调用或者其他的运算。
你可以试一下这2个有什么区别
print "hello, 1 + 1"
print "hello, @{[1+1]}"
还有，你有时候想这样：
print "I am get_my_name()"，你想内插一个方法调用，你很郁闷为什么不行呢，是的，就这样用：
print "I am @{[get_my_name()]}"

__lxmxn__

[] 是匿名引用，里面的表达式可以运算
@{} 就是解引用，最后得到表达式的值，而不是引用的地址

liyangole

回复 4# yiten


    好人呐，好人。顶

blackold

就是引用啊。

相当于print "This is a @array"。

blackold

回复 5# __lxmxn__


    解释到位

sellie

谢谢各位大大解惑.
perl有时就这样,让人觉得顿时无从下手.

zhlong8

谢谢各位大大解惑.
perl有时就这样,让人觉得顿时无从下手.
sellie 发表于 2011-01-27 13:17

    这个用法我也是头一次注意到，不过我知道正则替换后面应该是个字符串，@{ } 表示解引用， [] 表示引用，看到这个用法最多会“哦，原来里面还可以计算表达式”绝不会说无从下手。基础不牢固就是不牢嘛，找借口解决不了问题滴
    不知道这个方法前我可能会用 s///e 在后面用字符串连接