NAME

SYNOPSIS

    use Audio::APE;
    my $mac = Audio::APE->new("song.ape");

    foreach (keys %$mac) {
        print "$_: $mac->{$_}\n";
    }

    my $macTags = $mac->tags();

    foreach (keys %$macTags) {
        print "$_: $macTags->{$_}\n";
    }

DESCRIPTION

CONSTRUCTORS

•

new( $filename )

Opens a Monkey's Audio file, ensuring that it exists and is actually an Monkey's Audio stream, then loads the information and comment fields.

INSTANCE METHODS

• info( [$key] )

  Returns a hashref containing information about the Monkey's Audio file from the file's information header.

  The optional parameter, key, allows you to retrieve a single value from the info hash. Returns "undef" if the key is not found.

• tags( [$key] )

  Returns a hashref containing tag keys and values of the Monkey's Audio file from the file's APE tags.

  The optional parameter, key, allows you to retrieve a single value from the tag hash. Returns "undef" if the key is not found.

NOTE

SEE ALSO

AUTHOR

Kevin Deane-Freeman, <kevindf at shaw dot ca>, based on other work by Erik Reckase, <cerebusjam at hotmail dot com>, and Dan Sully, <daniel@cpan.org>

COPYRIGHT

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.2 or, at your option, any later version of Perl 5 you may have available.