关于 =~ s/../../g 转换的问题

MMMIX

原帖由 linuxty 于 2009-7-29 09:22 发表



还是不行的,这样直接就把$aa 赋值成字符串 $1$2$3 了

oops，再把下一行的 /g 换成 /gee.

[ 本帖最后由 MMMIX 于 2009-7-29 09:34 编辑 ]

linuxty

原帖由 MMMIX 于 2009-7-29 09:27 发表

oops，再把下一行的 /g 换成 /ge.

老大  还是不得行  还有什么要注意的 ....

MMMIX

原帖由 linuxty 于 2009-7-29 09:41 发表


老大  还是不得行  还有什么要注意的 ....

OK, the final answer:

1. 
   
2. $cc = '$3 . $2 . $1';
   
3. $ss =~ s/$ab/$cc/ee;
   

复制代码

linuxty

喔  明白了 谢谢老大

[ 本帖最后由 linuxty 于 2009-7-29 09:53 编辑 ]

MMMIX

原帖由 linuxty 于 2009-7-29 09:41 发表


老大  还是不得行  还有什么要注意的 ....

This works too:

1. 
   
2. $cc = '"$3$2$1"';
   
3. $ss =~ s/$ab/$cc/ee;
   

复制代码

MMMIX

原帖由 linuxty 于 2009-7-29 09:49 发表
replacement的分隔符是单引号时,作为单引号字符串,不会进行变量赋值.
/e修饰符是不是也要要求replacement不是单引号字符串 ?

嘛意思？

linuxty

原帖由 MMMIX 于 2009-7-29 09:52 发表

嘛意思？

想错了 发了帖才看到你发的帖  恍然大悟   嘻嘻

linuxty

/ee 是对求值的结果再求值,在这就是对 $c 替换成 $1$2$3 后再替换成匹配的值.

$c='$1$2$3'  $c='$1.$2.$3'  $c='"$1$2$3"' 3种方式.

为什么第1种不能替换,而2和3种可以替换也?

Perl_Er

/e是把//内的当作一段代码执行，第一个里面没有操作符，想一下假设$a$b$c放在一起执行会不会有问题，中间没有操作符连接，
第二个就不用说了，用.操作符连接了。第三个的话吧$1$2$3一起当作了一个字符串。

MMMIX

原帖由 linuxty 于 2009-7-29 10:05 发表
/ee 是对求值的结果再求值,在这就是对 $c 替换成 $1$2$3 后再替换成匹配的值.

$c='$1$2$3'  $c='$1.$2.$3'  $c='"$1$2$3"' 3种方式.

为什么第1种不能替换,而2和3种可以替换也?

其实这个错误信息已经说得很明白了。

最后执行的实际是 eval $1$2$3, 那么这里的 $1$2$3 是什么意思呢？它不在字符串中，所以不存在插值，因此 perl 将它理解为一个 expression，那么就需要 operator，找不到，所以报错。针对这个错误的修改就是后两种情况了，要么增加 operator .，使得 $1 . $2 . $3 成为一个合法的 expression, 或者把 $1$2$3 放在字符串中进行插值。