摘要：
$length = keys %hashname;则$length中得到的直接是该hash的key的个数。 阅读全文
摘要：
foreach my $i (@region){ $all++; @Rgene = split "\t",$i; system "samtools depth -r $Rgene[1] $bam > $all.txt"; my $file = "$all.txt";# print $file,"\n"; open(IN2,"$file"); while(){ chomp; $sum++; my @line = split "\t"; 阅读全文