Audio::TagLib::ID3v1::Tag - An ID3v1 tag implementation

  use Audio::TagLib::ID3v1::Tag;

  my $i = Audio::TagLib::ID3v1::Tag->new();
  $i->setYear(1981);
  print $i->year(), "\n"; # got 1981

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 StringHandler

NOTE Most fields are truncated to a maximum of 28-30 bytes. The truncation happens automatically when the tag is rendered.

new()

Create an ID3v1 tag with default values.

new(File $file, IV $tagOffset)

Create an ID3v1 tag and parse the data in $file starting at $tagOffset.

DESTROY()

Destroys this Tag instance.

ByteVector render()

Renders the in memory values to a ByteVector suitable for writing to the file.

ByteVector fileIdentifier() [static]

Returns the string "TAG" suitable for usage in locating the tag in a file.

String title()

String artist()

String album()

String comment()

String genre()

UV year()

UV track()

void setTitle(String $s)

void setArist(String $s)

void setAlbum(String $s)

void setComment(String $s)

void setGenre(String $s)

void setYear(UV $i)

void setTrack(UV $i)

see Tag

void setStringHandler(StringHandler $handler) [static]

Sets the string handler that decides how the ID3v1 data will be converted to and from binary data.

see StringHandler

None by default.

Audio::TagLib Tag

Dongxu Ma, <dongxu@cpan.org>

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.