[Bioperl-l] parser genbank

[Brian Osborne]

Fabiola,

Something like this, I think:

        my $io = Bio::SeqIO->new(-file => $file, -format => "genbank" );
        my $seq_obj = $io->next_seq;
        my $anno_collection = $seq_obj->annotation;

          my @annotations = $anno_collection->get_Annotations('comment'); #
or 'keyword'
          foreach my $value ( @annotations ) {
            print "tagname : ", $value->tagname, "\n";
            print "annotation value: ", $value->as_text, "\n";
          }

I didn't actually run this though...

Brian O.

-----Original Message-----
From: bioperl-l-bounces at portal.open-bio.org
[mailto:bioperl-l-bounces at portal.open-bio.org]On Behalf Of Fabiola Sánchez
Sent: Tuesday, December 02, 2003 4:01 PM
To: bioperl-l at bioperl.org
Subject: [Bioperl-l] parser genbank

Hi !
How can I get  Keywords and Comments from a file in Genbank format
Thanks
Fabi

_______________________________________________
Bioperl-l mailing list
Bioperl-l at portal.open-bio.org
http://portal.open-bio.org/mailman/listinfo/bioperl-l