Re: code example from Audio::OSS doc fails?

[atanug]

Try this one. This should work.

use IO::Handle;

    $io = new IO::Handle;
    open FILE, "</dev/dsp";
    if ($io->fdopen(fileno(FILE),"r")) {
        print $io->getline;
        $io->close;
    } else {
        print "Error\n";
    }
close FILE;