Previous changeset 27:c8090766c3f5 (2018-05-20) Next changeset 29:e10a2311e293 (2018-05-27) |
Commit message:
Uploaded |
modified:
bin/align.pm |
b |
diff -r c8090766c3f5 -r 8d8357dee6b3 bin/align.pm --- a/bin/align.pm Sun May 20 17:46:23 2018 -0400 +++ b/bin/align.pm Sun May 20 17:53:31 2018 -0400 |
[ |
@@ -388,7 +388,7 @@ my $R1U = 0; $R1U = $counthashR->{$k}->[6] / $counthashR->{$k}->[2] * 100 if $counthashR->{$k}->[2] != 0; my $S10A = 0; - $SA10 = $counthashR->{$k}->[5] / $counthashR->{$k}->[1] * 100 if $counthashR->{$k}->[1] != 0; + $S10A = $counthashR->{$k}->[5] / $counthashR->{$k}->[1] * 100 if $counthashR->{$k}->[1] != 0; my $R10A = 0; $R10A = $counthashR->{$k}->[4] / $counthashR->{$k}->[2] * 100 if $counthashR->{$k}->[2] != 0; |