变量赋值和匹配问题

kezhang

1，尝试$A="Power@Power_i[1]"; 可是为什么@不允许在其中。报语法错误！ 这个问题如何解决啊？
2，如果原文本中有带”@“这样的字符，在匹配中用(.*)可以匹配下来带 @的字符串，将该字符串赋值给一变量，该变量可以打印，但是用这个变量去匹配寻找其他文件中同字符串，却无法匹配。 而且如果 $A="Power_i[1]",   该变量$A也不能用来匹配。好像是[]的问题，为什么[]不能存在变量中匹配？ 如何做才好呢？

谢谢

逝去的华丽

@那个要用转义符号 \  \@表示匹配@

qiyanse

there is my code to test your problem:

=========================
#!/usr/bin/perl
$A="Power\@Power_i[1]";
if($A=~/Power\@Power_i\[1\]/){print $A;}
else {print "Oops";}
==========================


"[]" is used by match expression(m//), so you must use prefix "\" before "[" and "]".

by the way, if you use \ before @ in your variable $A, and you will get the correct result.
in m// you also use "\S+" to match your variable $A

kezhang

谢谢回复，但是我的意思不是这样
如果直接可以付值给变量当然是用"\",但是我现在的问题是，这串子符是从原文件匹配得来的，有的有@，有的有[,而我有必须二次利用这样的变量，于是就出现问题了。
请问如何办理？

MMMIX

原帖由 kezhang 于 2009-3-27 11:55 发表
这串子符是从原文件匹配得来的，有的有@，有的有[,而我有必须二次利用这样的变量，

什么意思？

kezhang

举例   文字如下：
fdsjakljk Power@Power_i[1]  dfjslajkj  888
我需要匹配到
Power@Power_i[1]  和 888 ， 匹配Power@Power_i[1]我用的是 /.* \s(.*)\s.*/,  并且 $A=$1;
将该内容放入一中转文件中。 然后我需要继续再中转文件中重新匹配下该字符。但是$A 在 /$A/中用不了。
有没有办法，可以让我的 $A 能够被匹配呢？

hfahe

看看

MMMIX

原帖由 kezhang 于 2009-3-27 17:49 发表
将该内容放入一中转文件中。 然后我需要继续再中转文件中重新匹配下该字符。但是$A 在 /$A/中用不了。

怎么个用不了法？

kezhang

原来的Power@Power_i[1]  是用/.* \s(.*)\s.*/,  并且 $A=$1;
然后去中转文件匹配，我想用/$A/来匹配，就不行啊！匹配不上哦。 有@和[]都不能再去匹配，能有办法吗？

cobrawgl

$b = 'Power@Power_i[1]';

$a = 'Power@Power_i[1]';

print 1 if $b =~ /\Q$a\E/;