NAME

Audio::Tagger::Flac - (DEPRECATED) Perl module to handle audio metadata (flac files)

VERSION

version 0.12

SYNOPSIS

Synopsis section

    use feature 'say';

    use Audio::Tagger::Flac;

    my $tagger = Audio::Tagger::Flac -> new("/path/to/file.flac");

    # 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");

METHODS

new( $filename )

Create an Audio::Tagger::Flac 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::Flac object, if called with no arguments, otherwise set the title tag to $title.

artist( [ $artist ] )

Return the artist tag of the given Audio::Tagger::Flac object, if called with no arguments, otherwise set the artist tag to $artist.

album( [ $album ] )

Return the album tag of the given Audio::Tagger::Flac object, if called with no arguments, otherwise set the album tag to $album.

comment( [ $comment ] )

Return the comment tag of the given Audio::Tagger::Flac object, if called with no arguments, otherwise set the comment tag to $comment.

genre( [ $genre ] )

Return the genre tag of the given Audio::Tagger::Flac object, if called with no arguments, otherwise set the genre tag to $genre.

year( [ $year ] )

Return the year tag of the given Audio::Tagger::Flac object, if called with no arguments, otherwise set the year tag to $year.

track( [ $track ] )

Return the track tag of the given Audio::Tagger::Flac object, if called with no arguments, otherwise set the track tag to $track.

bitrate( )

Return the bitrate of the given Audio::Tagger::Flac object.

samplerate( )

Return the sample rate of the given Audio::Tagger::Flac object.

channels( )

Return the number of channels of the given Audio::Tagger::Flac object.

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.