作业帮 > 综合 > 作业

perl 字符数字混合的匹配

来源:学生作业帮 编辑:百度作业网作业帮 分类:综合作业 时间:2024/05/30 21:12:48
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 字符数字混合的匹配
很显然,你的思路就是错的,你要是的相同,你又用了匹配的方法,匹配的话只要包含了就可以匹配上,如ABC12,ABC是能匹配的.所以思路应该是强制转换成小写,判断字符串相等(eq),当然转成大写也是一样的.
open FA,"