PERL的字符串操作

逝去的华丽

请教各位：
如果我想在一串2进制数中，消除一部分，比如：原始字符串：0100111000，要从中消去：0100110000，留下的为：0000001000，意思就是想消去上面字符串中的某些1，我本来想用 ^ ,结果居然不行。。。
有没有啥子好办法？

但是我如果用&符号，却可以得到 两串2进制数据之间的公共部分。如：$s1 = "0100011110" 和 $s2 = "0011001100"
假设我这样：$test = $s1 & $s2; 得到的$test = "0000001100",是我想要的结果。。但
如果我用：$tmp = $s1 ^ $test ; 得到的$tmp是乱码，用VI看是乱码，，类似这样的字符串：“^A^@^@”，如果将^A换为1，^@换为0，那就是我想要的结果。。可是为什么这里用^就不能显示出来呢》？？？

MMMIX

看下 perlop 中对 Bitwise String Operator 的介绍，尤其是那些例子。

MMMIX

原帖由 逝去的华丽 于 2009-3-20 16:12 发表
但是我如果用&符号，却可以得到 两串2进制数据之间的公共部分。如：$s1 = "0100011110" 和 $s2 = "0011001100"

这个可以是因为刚好凑巧了。'0' = 0x30, '1' = 0x31, '0' & '1' = 0x30 & 0x31 = 0x30 = '0'. 至于 '0' ^ '1' 是什么你可以自己算算

逝去的华丽

哦，楼上的，我明白了，你的意思是， perl中拿的是ASCII码来做运算？所以，凑巧 &操作可以得到想要的结果，^却不那么巧，呵呵。。
谢谢哈~~

MMMIX

原帖由 逝去的华丽 于 2009-3-20 20:17 发表
哦，楼上的，我明白了，你的意思是， perl中拿的是ASCII码来做运算？

嗯。

逝去的华丽

请问楼上一个问题，perl什么时候会把 $m = "10101010000" 当做数字，什么时候把它当做是字符串呢

MMMIX

原帖由 逝去的华丽 于 2009-3-22 16:00 发表
请问楼上一个问题，perl什么时候会把 $m = "10101010000" 当做数字，什么时候把它当做是字符串呢

需要数字的时候就把它当作数字，需要字符串的时候就把它当作字符串。

逝去的华丽

哦，那为什么在我这里，PERL没有把“100010101010”当成是数字呢？ 而用ASCII来表示其中的每一个字符。。看起来PERL把它当成了字符串。。这个是为什么呢？

MMMIX

原帖由 逝去的华丽 于 2009-3-23 10:25 发表
哦，那为什么在我这里，PERL没有把“100010101010”当成是数字呢？ 而用ASCII来表示其中的每一个字符。。看起来PERL把它当成了字符串。。这个是为什么呢？

你定义的就是个 string，而且 Perl 的 &, ^ 等的 operand 也可以是 string。那么，Perl 为什么要把它当作数字？

逝去的华丽

我定义的变量其实是从一个文本里面读过来的。那个文本是一个2进制数字的矩阵，形如：

10101011000
10010000000
00011010101
       .....

我将其中的每一行给一个变量。那么这个变量里面的内容是string？而不是数字？