Skip to content
Snippets Groups Projects
Commit 57a8b528 authored by Daniel Rios's avatar Daniel Rios
Browse files

modified the / separator to |

parent f0656809
No related branches found
No related tags found
No related merge requests found
......@@ -96,8 +96,8 @@ sub get_all_ConsequenceType {
#we have to consider het alleles
my $string;
if ($allele->allele_string =~ /\//){
my @alleles = split /\//,$allele->allele_string;
if ($allele->allele_string =~ /\|\\\//){
my @alleles = split /[\|\\\/]/,$allele->allele_string;
if ($alleles[0] ne $allele->ref_allele_string){
$string = $alleles[0];
}
......
0% or .
You are about to add 0 people to the discussion. Proceed with caution.
Finish editing this message first!
Please register or to comment