my $id;
if(@{$HRdata->{'entry'}->{'accession'}}){
   $id = $HRdata->{'entry'}->{'accession'}->[0];
}
else{
   $id = $HRdata->{'entry'}->{'accession'};
}