WMA(3pm)

🎀 WMA — the Perl module, bestie edition ✨

okay so first things first: this is Audio::WMA, and it lives in the Perl world as a 3pm page (that's a module page, not a command, iykyk). It's your little key to the metadata locked inside WMA/ASF files. Let's get into it 💖

---

✨ NAME ✨

Audio::WMA — a Perl extension for reading WMA/ASF Metadata. literally what it says on the tin, no cap 🫶

---

🌸 SYNOPSIS 🌸

here's the whole vibe, copy-paste ready:

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";
}

like… look at her. iconic. 💅

---

🦋 DESCRIPTION 🦋

So this module implements access to metadata contained in WMA files. That's the whole assignment. You point it at a file, it gives you the tea that's hiding inside. 🍓

---

💜 METHODS 💜

• new( $file ) — Create a new Audio::WMA instance from the data in $file. this is the moment she becomes the main character ✨
• info( ) — Get the audio data information in the form of a hash ref. yes bestie, a hash ref. keys and values, all yours 🌈
• tags( ) — Get the metadata / tag information in the form of a hash ref. the juicy stuff, in a hash ref 🎀
• stream( ) — Get the current ASF stream. 👑
• parseObject( $asf ) — Parse a standalone ASF object. one object, on its own, parsed. periodt.
• setDebug( 0 | 1 ) — Toggle debugging. flip it to 0 or 1, that's the whole deal 🔥
• setConvertTagsToUTF8( 0 | 1 ) — Toggle Encoding metadata tags as UTF-8

Toggle debugging.

ok so real talk, the original page has that "Toggle debugging." line sitting under this one too, and I'm not gonna lie to you and delete it — so here it is, exactly where it lives 🙈

---

⭐ SEE ALSO ⭐

• Audio::FLAC::Header
• <http://getid3.sf.net/>
• http://github.com/dsully/perl-audio/tree/master/Audio-WMA

go read those too, they're giving supporting cast 💖

---

🌟 AUTHOR 🌟

Dan Sully, <daniel | at | cpan.org> — yes the pipes are on purpose, that's how it's written, do not come for me 💀

---

👑 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.

---

and that's the whole page, bestie 🫶 this little gem came to you courtesy of perl v5.26.2, dated 2018-08-20, filed under WMA(3pm). slay, stay hydrated, go read some metadata ✨💅🎀