$splitstoreD = $bwa{$ID}[2] =~ /D/;
            $splitstoreI = $bwa{$ID}[2] =~ /I/;