#!/usr/bin/perl -w
use strict;
my $file="myseq.fa";
open(FH,$file) or die $!;
my $G_num=0;
my $C_num
统计fasta文件GC含量【Perl】
最新推荐文章于 2024-04-22 18:33:22 发布
![](https://img-home.csdnimg.cn/images/20240711042549.png)
#!/usr/bin/perl -w
use strict;
my $file="myseq.fa";
open(FH,$file) or die $!;
my $G_num=0;
my $C_num