The Perl Toolchain Summit needs more sponsors. If your company depends on Perl, please support this very important event.

NAME

MP3::Tag::ID3v2_Data - get_frame() data format and supported frames

SYNOPSIS

  \$mp3 = MP3::Tag->new(\$filename);
  \$mp3->get_tags();
  \$id3v2 = \$mp3->{ID3v2} if exists \$mp3->{id3v2};

  (\$info, \$long) = \$id3v2->get_frame(\$id);    # or

  (\$info, \$long) = \$id3v2->get_frame(\$id, 'raw');

DESCRIPTION

This document describes how to use the results of the get_frame function of MP3::Tag::ID3v2, thus the data format of frames retrieved with MP3::Tag::ID3v2::get_frame().

It contains also a list of all supported ID3v2-Frames.

get_frame()

 (\$info, \$long) = \$id3v2->get_frame(\$id);    # or
 
 (\$info, \$long) = \$id3v2->get_frame(\$id, 'raw');

\$id has to be a name of a frame like "APIC". For more variants of calling see get_frame().

The names of all frames found in a tag can be retrieved with the get_frame_ids() function.

Using the returned data

In the ID3v2.3 specifications $#frames frames are defined, which can contain very different information. That means that get_frame returns the information of different frames also in different ways.

Simple Frames

A lot of the tags contain only a text string and encoding information. If you call (\$info, \$long) = \$id3v2->get_frame(\$id) for such a frame, \$info will contain the text string and \$long will contain the english name of the frame.

Example: get_frame("TIT2"); # returns

  ("Birdhouse In Your Soul", "Title/songname/content description")
Complex Frames

For more complex frames the returned \$info is a reference to a hash, where each entry of the hash decribes a part of the information found in the frame. The key of a hash entry contains the name of this part, the according value contains the information itself.

Example: get_frame("APIC"); # returns

  ( { "Description" => "Flood", 
      "MIME Type" => "/image/jpeg", 
      "Picture Type" => "Cover (front)",
      "_Data" => "..data of jpeg picture (binary).."
     },
   "Attached Picture");
Other Frames

Some frames are not supported at the moment, ie the data found in the frame is not returned in a descriptive way. But you can read the data of this frames (and also of all other frames too) in raw mode. Then the complete data field of the frame is returned, without any modifications. This means that the returned data will be almost binary data.

Example: get_frame("TIT2", 'raw'); # returns

  ("\\x00Birdhouse In Your Soul", "Title/songname/content description")

The frames which (in addition to Text/URL) contain only Description and Language fields are in some intermediate position between "simple" and "complex" frames. They can be handled very similarly to "simple" frames by using "long names", such as COMM[description] or COMM(LANG)[description], and the corresponding "quick" API such as frame_select().

INTRO

@frames = keys %MP3::Tag::ID3v2::long_names; @other = (); @text = (); @complex = ();

foreach (@frames) { $data = MP3::Tag::ID3v2::what_data("", $_); if (ref $data) { if ($#$data == 0 and ($$data[0] =~ /^(Text|URL)$/ or $_ eq 'MCDI')) { push @text, $_; } else { push @complex, $_; } } else { push @other, $_; } }

print "\n\n=head2 List of Simple Frames\n\nFollowing Frames are supported and return a single string (text). In the List you can find the frame IDs and the long names of the frames as returned by \$id3v2->get_frame():\n\n=over 4\n\n"; foreach (sort @text) { $long = $MP3::Tag::ID3v2::long_names{$_}; print "\n=item $_ : $long\n"; } print "\n=back\n\n";

print "\n\n=head2 List of Complex Frames\n\n"; print "Following frames are supported and return a reference to a hash. The list shows which keys can be found in the returned hash:\n"; print "\n=over 4\n\n"; foreach (sort @complex) { $long = $MP3::Tag::ID3v2::long_names{$_}; print "\n=item $_ : $long\n\n"; $data = MP3::Tag::ID3v2::what_data("", $_); print " Keys: ", join(", ",@$data), "\n"; } print "\n=back\n\n";

print "\n\n=head2 List of Other Frames\n\n"; print "Following frames are only supported in raw mode:\n"; print "\n=over 4\n\n"; foreach (sort @other) { $long = $MP3::Tag::ID3v2::long_names{$_}; print "\n=item $_ : $long\n"; } print "\n=back\n\n";

print <<END;

SEE ALSO

MP3::Tag, MP3::Tag::ID3v2

END

select($std); close POD;