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/>
http://github.com/dsully/perl-audio/tree/master/Audio-WMA
AUTHOR¶
Dan Sully, <daniel | at | cpan.org>
COPYRIGHT AND LICENSE¶
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.