Ao - Perl extension for ao cross-platform audio library

  use Ao;

  $ao_id1 = Ao::get_driver_id('oss');
  %ao_info = %{Ao::get_driver_info($ao_id1)};
  $ao_endian = Ao::is_big_endian();
  $ao_dev1 = Ao::open($ao_id);
  Ao::play($ao_dev1, $buffer, $len);
  Ao::close($ao_dev1);

  $ao_id2 = Ao::get_driver_id('wav');
  %ao_options = ('file' => 'out.wav');
  $ao_dev2 = Ao::open($ao_id2, 16, 44100, 2, %ao_options);
  $ao_dev2->play($buffer, $len);
  $ao_dev2->close();

This is a simple object-oriented wrapper around the ao audio library. Use Ao::get_driver_id to obtain an integer id from a short driver name. Currently supported drivers are oss, irix, solaris, esd, alsa and wav.

A small hash of driver info (with fields name, short_name, author and comments) can be obtained with Ao::get_driver_info.

Ao::is_big_endian can be used to test the byte-order of the machine.

Open a device with

  Ao::open($driver_id, $bits_per_sample, $rate, $channels, %options)

where the default values are 16 bits at 44100 Hz stereo, and no options. options is a hash of named parameters to pass to the specific driver. The wav driver defaults to writing output to the file output.wav - you can change this by passing the file option. Other options can be found in the ao documentation.

Play to a device with

  Ao::play($device, $buffer, $len)

where $device is the device returned from Ao::open, $buffer is a pointer to a buffer of sound input, and $len is the length of the buffered sound to play. To obtain sound input you will need to use a separate module such as Ogg::Vorbis.

When you are done, close the device with Ao::close($device).

  AO_ALSA
  AO_BEOS
  AO_DRIVERS
  AO_ESD
  AO_IRIX
  AO_NULL
  AO_OSS
  AO_RAW
  AO_SOLARIS
  AO_WAV
  AO_WIN32

Alex Shinn, foof@debian.org

perl(1), Ogg::Vorbis(3pm), and the README distributed with ao.