NAME

Audio::WMA - Perl extension for reading WMA/ASF Metadata

SYNOPSIS

	use Audio::WMA;

	my $wma  = Audio::WMA->new($file);

	my $info = $wma->info();

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

	my $tags = $wma->tags();

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

DESCRIPTION

This module implements access to metadata contained in WMA files.

METHODS

• new( $file )

  Create a new Audio::WMA instance from the data in $file

• info( )

  Get the audio data information in the form of a hash ref.

• tags( )

  Get the metadata / tag information in the form of a hash ref.

• stream( )

  Get the current ASF stream.

• parseObject( $asf )

  Parse a standalone ASF object.

• setDebug( 0 | 1 )

  Toggle debugging.

• setConvertTagsToUTF8( 0 | 1 )

  Toggle Encoding metadata tags as UTF-8

  Toggle debugging.

SEE ALSO

Audio::FLAC::Header, http://getid3.sf.net/

AUTHOR

Dan Sully, <daniel@cpan.org>

COPYRIGHT AND LICENSE

Copyright 2003-2007 by Dan Sully & Slim Devices, Inc.

This library is free software; you can redistribute it and/or modify it under the same terms as Perl itself.