Plogue Bidule Audio Unit

Test::Unit::TestCase is a unit testing framework base class. SYNOPSIS package FooBar; use base qw(Test::Unit::TestCase); sub new { my $self = shift()->SUPER::new(@_); # your state for fixture here return $self; } sub set_up { # provide fixture } sub tear_down { # clean up after... Platforms: *nix

Test::Unit::Runner::Terminal is a unit testing framework helper class. SYNOPSIS use Test::Unit::Runner::Terminal; my $testrunner = Test::Unit::Runner::Terminal->new(); $testrunner->start($my_test_class); This class is a test runner for the command line style use of the testing framework.... Platforms: *nix

Audio collection script is a script which can help you manage collections of audio files. For example, I have a directory with all my audio files in it, sorted by band/album. I also have an audio collections directory. Within that directory I have a few list files which contain patterns for songs... Platforms: *nix

Test::Unit::Procedural Perl module contains a procedural style unit testing interface. SYNOPSIS use Test::Unit::Procedural; # your code to be tested goes here sub foo { return 23 }; sub bar { return 42 }; # define tests sub test_foo { assert(foo() == 23, "Your message here"); } sub... Platforms: *nix

Test::Unit::InnerClass is a unit testing framework helper class. SYNOPSIS This class is not intended to be used directly This class is used by the framework to emulate the anonymous inner classes feature of Java. It is much easier to port Java to Perl using this class.. Platforms: *nix

Audio::MFCC is a Perl module for computing mel-frequency cepstral coefficients. SYNOPSIS use Audio::MFCC; my $fe = Audio::MFCC->init(%params) $fe->start_utt; my @ceps = $fe->process_utt($rawdata, $nsamps); my $leftover = $fe->end_utt; This module provides an interface to the Sphinx-II... Platforms: *nix

Audio::ESD is a Perl extension for talking to the Enlightened Sound Daemon. SYNOPSIS use Audio::ESD; my $stream = Audio::ESD->play_stream({ # these are the defaults sample_rate => 16000, channels => 1, fallback => 0, bits_sample => 16, encoding => linear }) or die "Failed to open ESD... Platforms: *nix

Audio::SPX is a Perl interface to the Sphinx-II audio library. SYNOPSIS use Audio::SPX; my $ad = Audio::SPX->open_sps(16000); $ad->start_rec or die "start_rec failed"; $ad->stop_rec or die "stop_rec failed"; my $samples = $ad->read($buf, $max); my $cad =... Platforms: *nix

Audio::OSS is a pure-perl interface to OSS (open sound system) audio devices. SYNOPSIS use Audio::OSS qw(:funcs :formats :mixer); my $dsp = IO::Handle->new(" dsp_reset($dsp) or die "reset failed: $!"; my $mask = get_supported_formats($dsp); if ($mask & AFMT_S16_LE) { set_fmt($dsp,... Platforms: *nix

Audio::Ao is a Perl wrapper for the Ao audio library. SYNOPSIS use Audio::Ao qw(:all); initialize_ao; my $device = open_live(default_driver_id(), 16, $rate, $channels, is_big_endian(), {}); while (#have data) { play($device, $data_buffer, $len_of_buffer); } close_ao($device($device));... Platforms: *nix

Audio::TagLib::ID3v2::SynchData is a Perl module with a few functions for ID3v2 synch safe integer conversion. SYNOPSIS use Audio::TagLib::ID3v2::SynchData; print Audio::TagLib::ID3v2::SynchData->toUInt( Audio::TagLib::ByteVector->new("11")), "n"; # got 6321 print... Platforms: *nix

Audio::TagLib::MPEG::File is an MPEG file class with some useful methods specific to MPEG. SYNOPSIS use Audio::TagLib::MPEG::File; my $i = Audio::TagLib::MPEG::File->new("sample file.mp3"); print $i->tag()->artist()->toCString(), "n"; # got artist This implements the generic... Platforms: *nix

Audio::TagLib::MPEG::XingHeader is an implementation of the Xing VBR headers. SYNOPSIS use Audio::TagLib::MPEG::XingHeader; my $i = Audio::TagLib::MPEG::XingHeader->new($data); print $i->isValid() ? "valid" : "invalid", "n"; This is a minimalistic implementation of the Xing VBR headers.... Platforms: *nix

Audio::TagLib::MPEG::Properties is an implementation of audio property reading for MP3. SYNOPSIS use Audio::TagLib::MPEG::Properties; my $f = Audio::TagLib::MPEG::File->new("sample file.mp3"); my $i = $f->audioProperties(); print $i->layer(), "n"; # got 3 This reads the data from an... Platforms: *nix

Audio::TagLib::ByteVector is a byte vector. SYNOPSIS use Audio::TagLib::ByteVector; my $i = Audio::TagLib::ByteVector->new(); $i->setData("blah blah blah"); print $i->data(), "n"; # got "blah blah blah" This class provides a byte vector with some methods that are useful for tagging... Platforms: *nix

Audio::TagLib::MPEG::Header is an implementation of MP3 frame headers. SYNOPSIS use Audio::TagLib::MPEG::Header; my $i = Audio::TagLib::MPEG::Header->new($data); This is an implementation of MPEG Layer III headers. The API follows more or less the binary format of these headers. Refer to... Platforms: *nix

Audio::TagLib::ID3v2::RelativeVolumeFrame is an ID3v2 relative volume adjustment frame implementation. SYNOPSIS use Audio::TagLib::ID3v2::RelativeVolumeFrame; my $i = Audio::TagLib::ID3v2::RelativeVolumeFrame->new( Audio::TagLib::ByteVector->new("")); $i->setChannelType("MasterVolume");... Platforms: *nix

Audio::TagLib::Shell is a mini shell of Audio::TagLib. SYNOPSIS $> perl -MAudio::TagLib::Shell -e shell $tag:>open file openned successfully $tag:o>title < title in tag > $tag:o>artist < artist in tag > $tag:o>channels 2 $tag:o>setComment blah blah blah comment set successfully... Platforms: *nix

Audio::TagLib::MPC::File is an implementation of Audio::TagLib::File with MPC specific methods. SYNOPSIS use Audio::TagLib; my $i = Audio::TagLib::MPC::File->new("sample mpc file.mpc"); print $i->tag()->title()->toCString(), "n"; # got title This implements and provides an interface for... Platforms: *nix

Audio::TagLib::File is a file class with some useful methods for tag manipulation. This class is a basic file class with some methods that are particularly useful for tag editors. It has methods to take advantage of ByteVector and a binary search method for finding patterns in a file.... Platforms: *nix