[MacPerl] AudioCD

[Chris Nandor <pudge@pobox.com>]

use AudioCD;
$cd = new AudioCD;
$cd->volume(255);  # max
$cd->play(7);  # track 7

Not tested with CFM68K, requires CFM68K or PPC installation to work,
because it is XS (my first real XS / C code :).  eject() is busted, if you
can fix it, wonderful (it crashes my machines sometimes, all of them
running Mac OS 8.5 on PPCs).

Beta code, tread lightly.

    http://pudge.net/macperl/AudioCD.html

This can be used with CDDB.pm, too, which is on CPAN in
authors/id/R/RC/RCAPUTO (IIRC).

Have fun, give me feedback, read all the docs,

--
Chris Nandor          mailto:pudge@pobox.com         http://pudge.net/
%PGPKey = ('B76E72AD', [1024, '0824090B CE73CA10  1FF77F13 8180B6B6'])

***** Want to unsubscribe from this list?
***** Send mail with body "unsubscribe" to mac-perl-request@iis.ee.ethz.ch