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”，自己加的也不行。
希望大家帮帮我，愿意散很多很多金！！保证！！
回复此楼