package Audio::TagLib::APE::Tag; use 5.008003; use strict; use warnings; our $VERSION = '1.41'; use Audio::TagLib; our @ISA = qw(Audio::TagLib::Tag); # Preloaded methods go here. 1; __END__ # Below is stub documentation for your module. You'd better edit it! =head1 NAME Audio::TagLib::APE::Tag - An APE tag implementation =head1 SYNOPSIS use Audio::TagLib::APE::Tag; my $i = Audio::TagLib::APE::Tag(); $i->setTitle(Audio::TagLib::String->new("title")); print $i->title()->toCString(), "\n"; # got "title" =head1 DESCRIPTION B: Inherit from L =over =item I Create an APE tag with default values. =item I $file, IV $tagOffset)> Create an APE tag and parse the data in $file with APE footer at a $tagOffset. =item I Destroys this Tag instance. =item I render()> Renders the in memory values to a ByteVector suitable for writing to the file. =item I fileIdentifier()> [static] Returns the string "APETAGEX" suitable for usage in locating the tag in a file. =item I title()> =item I artist()> =item I album()> =item I comment()> =item I genre()> =item I =item I =item I $s)> =item I $s)> =item I $s)> =item I $s)> =item I $s)> =item I =item I see L =item I footer()> Returns a pointer to the tag's footer. =item I Returns a reference to a hash, which is tied with the returned item list map in C/C++ code. This is an ItemListMap of all of the items in the tag. This is the most powerfull structure for accessing the items of the tag. B You should not modify this data structure directly, instead use I and I. =item I $key)> Removes the $key item from the tag =item I $key, L $value, BOOL $replace=TRUE)> Adds to the item specified by $key the data $value. If $replace is true, then all of the other values on the same key will be removed first. =item I $key, L $item)> Sets the $key item to the value of $item. If an item with the $key is already present, it will be replaced. =back =head2 EXPORT None by default. =head1 SEE ALSO L L =head1 AUTHOR Dongxu Ma, Edongxu@cpan.orgE =head1 COPYRIGHT AND LICENSE Copyright (C) 2005 by Dongxu Ma 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.7 or, at your option, any later version of Perl 5 you may have available. =cut