Skip to contentSkip to conversation

opening /dev/sequencer, in perl.

DISCUSSION Etienne Grossmann 1 participant 1 message Dec 7, 1998 Sound

lore
Share & tools
lore
#0 lore raw

Hello, I have been trying to open /dev/sequencer for writing : In C,
I do :

    fd = open("/dev/sequencer", O_WRONLY))

and the filehandle can be manipulated (carefully) to produce sound. In perl, I have tried :

try1:

		open(FD,">/dev/sequencer") or die "NOPE\n"; 
		print FD "";

try2:

	  use IO::File; 
		$fh = new IO::File "/dev/sequencer", O_WRONLY; 
		print "NOPE\n" unless defined($fh);

try3:

    use Fcntl; 
		sysopen(FD,"/dev/sequencer",O_WRONLY) ; 
		print FD "" ;

but none of them work.

Would anyone have an explanation to my troubles?

Etienne

ps : I use perl 5.005, Linux kernel is 2.0.34 (Debian 2.0). Sound card
is soundblaster compatible.