usage: new IO::Handle at a.pl line 4
##</code><code>##

use IO::Handle;

use Audio::OSS qw(:funcs :formats :mixer);
my $dsp = new IO::Handle("</dev/dsp") or die "open failed: $!";