NAME

SYNOPSIS

    use BibTeX::Parser;
        use IO::File;

    my $fh     = IO::File->new("filename");

    # Create parser object ...
    my $parser = BibTeX::Parser->new($fh);
    
    # ... and iterate over entries
    while (my $entry = $parser->next ) {
            if ($entry->parse_ok) {
                    my $type    = $entry->type;
                    my $title   = $entry->field("title");

                    my @authors = $entry->author;
                    # or:
                    my @editors = $entry->editor;
                    
                    foreach my $author (@authors) {
                            print $author->first . " "
                                . $author->von . " "
                                . $author->last . ", "
                                . $author->jr;
                    }
            } else {
                    warn "Error parsing file: " . $entry->error;
            }
    }

FUNCTIONS

        * fh: A filehandle

NOTES

SEE ALSO

• BibTeX::Parser::Entry
• BibTeX::Parser::Author

VERSION

AUTHOR

COPYRIGHT AND LICENSE

This is free software; you can redistribute it and/or modify it under the same terms as the Perl 5 programming language system itself.