| Previous changeset 24:36e45a7b3eff (2018-05-13) Next changeset 26:b3be854a4273 (2018-05-20) |
|
Commit message:
Uploaded |
|
modified:
bin/align.pm |
| b |
| diff -r 36e45a7b3eff -r e26d3bee9348 bin/align.pm --- a/bin/align.pm Sun May 13 15:53:26 2018 -0400 +++ b/bin/align.pm Sun May 13 15:55:43 2018 -0400 |
| [ |
| @@ -303,7 +303,7 @@ } else { - $number{$line[2]}->[2]++ + $number{$line[2]}->[2]++; $number{$line[2]}->[4]++ if $seq[9] eq 'A'; } if ($_ =~ /.*XM:i:(\d+).*/) |