回复: Re: [PerlChina] 新手求助，匹配问题，请大家帮忙看看

"请问如何用具体的数字来匹配这写文本呢？"

不太明白，你是指对每一行，如何通过正则表达式来匹配到这个基因的ID吗？

不清楚你是单纯查询呢还是要按基因统计呢？

 

---

zehui.hug

 

发件人： Zhang Ming

发送时间： 2012-10-30 11:31

收件人： perlchina

抄送： lixiangchenxy

主题： Re: [PerlChina] 新手求助，匹配问题，请大家帮忙看看

open FILE, $gen_file or die "cannot open file";

while (<FILE>) {

    print $_ if $_ =~ /$id/;

}

close FILE;

2012/10/30 李相辰 <lixiangchenxy@gmail.com>

我在处理一个基因文本，部分内容如下：

COG1110 604354.TSIB_0530 1 1212

COG1110 598659.NAMH_1071 1 1060 

COG1110 593117.TGAM_1679 1 1216 

COG1110 590168.Tnap_0803 1 1104 

COG1110 579137.Metvu_1264 1 865 

COG1110 573064.Mefer_0049 6 869 

COG1110 563041.HPG27_964 428 531

.......

我想用perl编写一个程序来匹配这些文本中相同ID的基因，如输入"604354"匹配出"COG1110 604354.TSIB_0530 1 1212"，这一行，请问如何用具体的数字来匹配这写文本呢？谢谢！

--
您收到此邮件是因为您订阅了 Google 网上论坛的"PerlChina Mongers 讨论组"论坛。
要向此网上论坛发帖，请发送电子邮件至 perlchina@googlegroups.com。
要取消订阅此网上论坛，请发送电子邮件至 perlchina+unsubscribe@googlegroups.com。
若有更多问题，请通过 http://groups.google.com/group/perlchina?hl=zh-CN 访问此网上论坛。

--
-ming

--
您收到此邮件是因为您订阅了 Google 网上论坛的"PerlChina Mongers 讨论组"论坛。
要向此网上论坛发帖，请发送电子邮件至 perlchina@googlegroups.com。
要取消订阅此网上论坛，请发送电子邮件至 perlchina+unsubscribe@googlegroups.com。
若有更多问题，请通过 http://groups.google.com/group/perlchina?hl=zh-CN 访问此网上论坛。