有的时候,很多fasta文件是这个样子的:
但是,有些软件或者程序只能是一行id,一行序列的读取。这就要求我们需要将上述格式序列多行转一行。下面这段代码可以解决上述问题。
#!/usr/bin/perl
use strict;
use warnings;
my $id;
my $seq;
open IN,"$ARGV[0]"
有的时候,很多fasta文件是这个样子的:
但是,有些软件或者程序只能是一行id,一行序列的读取。这就要求我们需要将上述格式序列多行转一行。下面这段代码可以解决上述问题。
#!/usr/bin/perl
use strict;
use warnings;
my $id;
my $seq;
open IN,"$ARGV[0]"