Read MP3 ID3 Tags in Perl

Andrew — Thu, 03 Dec 2009 20:59:12 +0000

The package I use for simple tag reading is MP3::Tag, available on CPAN with more information here.

The following example shows how easy it is to retrieve tags from an MP3 file.

use MP3::Tag;
 
my $file = MP3::Tag->new($filename);
 
my ($title, $track, $artist, $album, $comment, $year, $genre) = $file->autoinfo();
 
print "Title: [$title]\n";
print "Artist: [$artist]\n";
print "Album: [$album]\n";
print "Track: [$track]\n";
print "Year: [$year]\n";
print "Genre: [$genre]\n";
print "Comment: [$comment]\n\n";

Andrew Beaton :: FAQ » Perl

Read MP3 ID3 Tags in Perl