Help for this page
return map {tr/\0/\0/ / $len} $ref_seq ^ $test_seq;
my($score) = map {tr/\0// / $len} $ref_seq ^ $test_seq; return $score;
return +(map{tr/\0// / $len} $ref_seq ^ $test_seq)[0];
www.com | www.net | www.org
No recent polls found