Audio::WMA - Perl extension for reading WMA/ASF Metadata
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"; }
This module implements access to metadata contained in WMA files.
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
Audio::FLAC::Header, http://getid3.sf.net/
http://github.com/dsully/perl-audio/tree/master/Audio-WMA
Dan Sully, <daniel | at | cpan.org>
Copyright 2003-2008 by Dan Sully & Logitech.
This library is free software; you can redistribute it and/or modify it under the same terms as Perl itself.
To install Audio::WMA, copy and paste the appropriate command in to your terminal.
cpanm
cpanm Audio::WMA
CPAN shell
perl -MCPAN -e shell install Audio::WMA
For more information on module installation, please visit the detailed CPAN module installation guide.