my $seqio = $gb->get_Stream_by_id(['13474692']);
                                                                                                                                                                                    
  while( my $seq = $seqio->next_seq ) {
      print "seq is  ", $seq->display_id, "\n";
      my @f=$seq->get_all_SeqFeatures; #This gives you the annotation of the retrieved sequence object