view release on metacpan or  search on metacpan

eg/biblio-soap.pl  view on Meta::CPAN

my $refs = new Bio::Biblio->find("Osborne","authors")->find("2000","year");
while ($refs->has_next){
   my $ref = $refs->get_next;
   my $io = Bio::Biblio::IO->new( -result => "raw", -data => $ref );
   my $nextref = $io->next_bibref;
   my $abstract = $nextref->{article}->{abstract}->{abstractText};
   # you could also write:
   # my $abstract = Bio::Biblio::IO->new( -result => "raw",
   #  -data => $refs->get_next )->next_bibref->{article}->{abstract}->{abstractText};
   print $abstract,"\n";
}

=head1 Output from Data::Dumper->Dump:

88329717 = {
            'chemicals' => [
                            {
                             'nameOfSubstance' => 'DNA, Fungal',
                             'registryNumber'  => '0'
                            },
                            {
                             'nameOfSubstance' => 'DNA, Superhelical',
                             'registryNumber'  => '0'
                            },
                            {
                             'nameOfSubstance' => 'RNA Polymerase II',
                             'registryNumber'  => 'EC 2.7.7.-'
                            }
                           ],
            'journalInfo' => {
                              'medlineTA'   => 'Genes Dev',
                              'country'     => 'UNITED STATES',
                              'nlmUniqueID' => '8711660'
                             },
            'PMID'      => '3047008',
            'medlineID' => '88329717',
            'status'    => 'Completed',
            'article'   => {
                            'journal' => {
                                          'journalIssue' => {
                                                             'volume'       => '2',
                                                             'issue'        => '6',
                                                             'pubDate'      => {
                                                                                'month' => 'Jun',
                                                                                'year'  => '1988'
                                                                               }
                                                            },
                                          'iSSN' => '0890-9369'
                                         },
                            'grants' => [
                                         {
                                          'agency'  => 'NIGMS',
                                          'grantID' => '5R01 GM30454-05',
                                          'acronym' => 'GM'
                                         }
                                        ],
                            'pagination' => {
                                             'medlinePgn' => '766-72'
                                            },
                            'abstract' => {
                                           'abstractText' => 'We show that induction of transcription of a CYC1-lacZ fusion gene, borne on a yeast plasmid, causes an increase in negative superhelicity of approximately five turns. This increase is abo...
                                          },
                            'languages' => [
                                            'eng'
                                           ],
                            'publicationTypes' => [
                                                   'Journal Article'
                                                  ],
                            'authors' => [
                                          {
                                           'personalName' => {
                                                              'initials' => 'BI',
                                                              'lastName' => 'Osborne',
                                                              'foreName' => 'B I',
                                                              'type'     => 'PersonalName'
                                                             }
                                          },
                                          {
                                           'personalName' => {
                                                              'initials' => 'L',
                                                              'lastName' => 'Guarente',
                                                              'foreName' => 'L',
                                                              'type'     => 'PersonalName'
                                                             }
                                          }
                                         ],
                            'articleTitle' => 'Transcription by RNA polymerase II induces changes of DNA topology in yeast.',
                            'affiliation' => 'Massachusetts Institute of Technology, Department of Biology, Cambridge 02139.'
                           },
            'dateRevised' => {
                              'day' => '18',
                              'month' => '12',
                              'year' => '2000'
                             },
            'meshHeadings' => [
                               {
                                'descriptorName' => 'Chromosome Deletion'
                               },
                               {
                                'descriptorName' => 'DNA, Fungal',
                                'subHeadings' => [
                                                  {
                                                   'subHeading' => 'genetics',
                                                   'majorTopic' => 'Y'
                                                  },
                                                  {
                                                   'subHeading' => 'ultrastructure'
                                                  }
                                                 ]
                               },
                               {
                                'descriptorName' => 'DNA, Superhelical',
                                'subHeadings' => [
                                                  {
                                                   'subHeading' => 'genetics'
                                                  }
                                                 ]
                               },
                               {
                                'descriptorName' => 'Genes, Fungal'
                               },