Commit c3eb026e authored by Monika Komorowska's avatar Monika Komorowska
Browse files

update to stable id regex

parent 44c16d78
......@@ -88,7 +88,7 @@ sub run_script {
my @lines = split(/\n/,$response->content);
foreach my $line (@lines){
my ($prot, $ens) = split /\s+/,$line;
if($ens =~ /$prefix{$species_id}/){
if($ens =~ /^$prefix{$species_id}P\d+$/){
push @{$prot2ensembl{$prot}}, $ens;
}
}
......
Markdown is supported
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