X-Git-Url: https://git.donarmstrong.com/?a=blobdiff_plain;f=misc%2Fsoap2sam.pl;h=b37135e811c6300d734488ae5a112f421bb920b5;hb=c560dcebed800084f30f3c277d13e6fd8629908c;hp=1628c0f2230b4cfbb45f3830e1e93bc2cb097e94;hpb=7c8e419216b32789afc3ee7a6dadfad6010c97de;p=samtools.git

diff --git a/misc/soap2sam.pl b/misc/soap2sam.pl
index 1628c0f..b37135e 100755
--- a/misc/soap2sam.pl
+++ b/misc/soap2sam.pl
@@ -64,6 +64,8 @@ sub soap2sam_aux {
   my @t = split(/\s+/, $line);
   return -1 if (@t < 9 || $line =~ /^\s/ || !$t[0]);
   @$s = ();
+  # fix SOAP-2.1.x bugs
+  @t = @t[0..2,4..$#t] unless ($t[3] =~ /^\d+$/);
   # read name
   $s->[0] = $t[0];
   $s->[0] =~ s/\/[12]$//g;