
Audio::ApeTags - An interface to the APE tagging structure implemented entirely in Perl.

use Audio::ApeTags;
my $ape = getTags("song.flac");
$apeTags = $ape->{'tags'};
foreach (keys %{$apeTags}) {
print "$_: $apeTags->{$_}\n";
}

This module returns a hash containing the contents of the Ape tags associated with an audio file. There is no complete list of tag keys for Ape tags, as they can be defined by the user; the basic set of tags used in the Ape convention include (but will not likely all be defined for a most audio files):
Title
Subtitle
Artist
Album
Debut Album
Publisher
Conductor
Track
Composer
Comment
Copyright
Publicationright
File
EAN/UPC
ISBN
Catalog
LC
Year
Record Date
Record Location
Genre
Media
Index
Related
ISRC
Abstract
Language
Bibliography
Introplay
Associated with each key is a set of flags; these flags contain information about the editability of the tag/item as well as the type of contents.

getTags ($filename)Opens an audio file and attempts to read APE tags from the top and bottom of the file, skipping ID3 tags if present.

http://www.personal.uni-jena.de/~pfk/mpp/sv8/apetag.html

Dan Sully, <daniel@cpan.org>
Erik Reckase, <cerebusjam at hotmail dot com>

Copyright (c) 2003-2007, Dan Sully & Slim Devices
Copyright (c) 2003, Erik Reckase.
This library is free software; you can redistribute it and/or modify it under the same terms as Perl itself, either Perl version 5.8.2 or, at your option, any later version of Perl 5 you may have available.