perl 字符数字混合的匹配我有A文件：B文件：chr1 ABC chr19 abc chr2 EDF chrX ab67chr3 345chr4 AB67然后我想找出A的第二列和B的第二列相同的,就是假如$a[1]和$b[1]相同的话（不区分大小写）,就输出$a[0]\t$a[

perl 字符数字混合的匹配我有A文件：B文件：chr1 ABC chr19 abc chr2 EDF chrX ab67chr3 345chr4 AB67然后我想找出A的第二列和B的第二列相同的,就是假如$a[1]和$b[1]相同的话（不区分大小写）,就输出$a[0]\t$a[
perl 字符数字混合的匹配
我有A文件：B文件：
chr1 ABC chr19 abc
chr2 EDF chrX ab67
chr3 345
chr4 AB67
然后我想找出A的第二列和B的第二列相同的,就是假如$a[1]和$b[1]相同的话（不区分大小写）,就输出$a[0]\t$a[1]\t$b[0]\t$b[1]
现在的问题是,我用循环,if($a[1]=~m/$b[1]/si)能匹配得到ABC和abc,但是数字和字母混合的话,就不能被识别.我需要AB67和ab67这个结果也能被输出.该怎么写呢?

perl 字符数字混合的匹配我有A文件：B文件：chr1 ABC chr19 abc chr2 EDF chrX ab67chr3 345chr4 AB67然后我想找出A的第二列和B的第二列相同的,就是假如$a[1]和$b[1]相同的话（不区分大小写）,就输出$a[0]\t$a[
很显然,你的思路就是错的,你要是的相同,你又用了匹配的方法,匹配的话只要包含了就可以匹配上,如ABC12,ABC是能匹配的.所以思路应该是强制转换成小写,判断字符串相等（eq),当然转成大写也是一样的.
open FA,"