写一个随机DNA序列 100bp用的是PERL

问题描述:

写一个随机DNA序列 100bp
用的是PERL

my @base=(A,G,C,T);
my $seq;
for(my $i=0;$i