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

来源:学生作业帮助网 编辑:作业帮 时间:2024/04/29 06:13:38
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,"