NAME
Audio::Tagger::File - Perl module to handle audio metadata (generic files)
VERSION
version 0.02
SYNOPSIS
Synopsis section
use feature 'say';
use Audio::Tagger::File;
my $tagger = Audio::Tagger::File -> new("/path/to/file.mp3");
# print the song title
say $tagger -> title;
# print the song artist
say $tagger -> artist;
# change and print the song album
say $tagger -> album("Awesome Album");
# save the modifications to disk
$tagger -> save or
die("Cannot write to disk");DESCRIPTION
Audio::Tagger is a module to read and write metadata from various types of different audio formats, based on taglib. It tries to be easy to use, but flexible enough to allow most of the usages of this kind of software. It isn't (and won't be) a full Perl taglib interface.
Why another module for audio tags? There are some other modules that handle audio tags, but they are either incomplete or completely broken. For instance, Audio::Scan and Audio::File can only read tags, Audio::TagLib does not even build, Audio::Metadata, Audio::APE, Mp3::Info, and others support only a single audio or tag format, etc...
METHODS
new( $filename )
Create an Audio::Tagger::File object given a file name.
save( )
Save the file to disk. Returns true on success.
title( [ $title ] )
Return the title tag of the given Audio::Tagger object, if called with no arguments, otherwise set the title tag to $title.
artist( [ $artist ] )
Return the artist tag of the given Audio::Tagger object, if called with no arguments, otherwise set the artist tag to $artist.
album( [ $album ] )
Return the album tag of the given Audio::Tagger object, if called with no arguments, otherwise set the album tag to $album.
comment( [ $comment ] )
Return the comment tag of the given Audio::Tagger object, if called with no arguments, otherwise set the comment tag to $comment.
genre( [ $genre ] )
Return the genre tag of the given Audio::Tagger object, if called with no arguments, otherwise set the genre tag to $genre.
year( [ $year ] )
Return the year tag of the given Audio::Tagger object, if called with no arguments, otherwise set the year tag to $year.
track( [ $track ] )
Return the track tag of the given Audio::Tagger object, if called with no arguments, otherwise set the track tag to $track.
AUTHOR
Alessandro Ghedini <alexbio@cpan.org>
LICENSE AND COPYRIGHT
Copyright 2011 Alessandro Ghedini.
This program is free software; you can redistribute it and/or modify it under the terms of either: the GNU General Public License as published by the Free Software Foundation; or the Artistic License.
See http://dev.perl.org/licenses/ for more information.