24小时热门版块排行榜    

查看: 382  |  回复: 1

桃子三三

银虫 (小有名气)

[求助] perl语言使用问题,多金币哦!!

#!/usr/bin/perl
                use warnings;
                use strict;  
                          
        my $lines=<>;
                $_ = $lines ;
     
        my $count = () = $_=~ m/TGACG/g;
                        print "The number of occurrences  $count\n";
                        print "The position are \n";
                while( $_ =~ /TGACG/g ) {
      print @+, "\n" ;
                }
这是虫友帮助给的在长序列中搜索TGACG的命令,现在还需要解决一下问题:
1.我有两万条长序列,放在一个txt里,求命令里加打开此txt(自己试过N次,不行)
2.以上程序只可搜索一条长序列,可否批量搜索
3.结果导出“>ans.txt”,自己加的也不行。
希望大家帮帮我,愿意散很多很多金!!保证!!
回复此楼

» 猜你喜欢

» 本主题相关价值贴推荐,对您同样有帮助:

已阅   回复此楼   关注TA 给TA发消息 送TA红花 TA的回帖

kjeldahl

禁虫 (正式写手)

本帖内容被屏蔽

2楼2013-05-21 09:30:26
已阅   回复此楼   关注TA 给TA发消息 送TA红花 TA的回帖
相关版块跳转 我要订阅楼主 桃子三三 的主题更新
信息提示
请填处理意见