ENSCORESW-1137: regexp now deals with GN that have or have not evidence level...

ENSCORESW-1137: regexp now deals with GN that have or have not evidence level tags, and stores only the gene name

misc-scripts/xref_mapping/XrefParser/UniProtParser.pm

@@ -384,7 +384,7 @@ sub create_xrefs {
         my $gene_name = undef;
         my %depe;
 
-        if($gn =~ /Name=(\S+)/){
+        if($gn =~ /Name=((.*?))[;\s]/){
           $depe{LABEL} = uc($1);
           $depe{ACCESSION} = $self->get_name($xref->{ACCESSION},$depe{LABEL});
           $gene_name = $depe{ACCESSION};