package Audio::TagLib::ID3v1::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::ID3v1::Tag - An ID3v1 tag implementation =head1 SYNOPSIS use Audio::TagLib::ID3v1::Tag; my $i = Audio::TagLib::ID3v1::Tag->new(); $i->setYear(1981); print $i->year(), "\n"; # got 1981 =head1 DESCRIPTION This is an implementation of the ID3v1 format. ID3v1 is both the simplist and most common of tag formats but is rather limited. Because of its pervasiveness and the way that applications have been written around the fields that it provides, the generic Audio::TagLib::Tag API is a mirror of what is provided by ID3v1. ID3v1 tags should generally only contain Latin1 information. However because many applications do not follow this rule there is now support for overriding the ID3v1 string handling using the ID3v1::StringHandler class. Please see the documentation for that class for more information. see L B Most fields are truncated to a maximum of 28-30 bytes. The truncation happens automatically when the tag is rendered. =over =item I Create an ID3v1 tag with default values. =item I $file, IV $tagOffset)> Create an ID3v1 tag and parse the data in $file starting at $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 "TAG" 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 $handler)> [static] Sets the string handler that decides how the ID3v1 data will be converted to and from binary data. see L =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