perl實現計算GC含量

#!/usr/bin/perl -w unless(@ARGV==2){ die "Usage: perl $0 <input_fasta> <output> error:$!\n"; } my($input, $output)=@ARGV; open INPUT, $input; open OUTPUT, ">$output"; #==================Store sequen

>>阅读原文<<