Hi. I am trying to make a CD with a gentle beep every 30s . The sound is used by a live coder for timing events with pencil and paper in field research. I don't know much about Perl audio, or about CD file formats.
I wrote this little beeping program:
use Win32::Sound;
use Time::Hires qw(sleep);
use strict;
$|++;
Win32::Sound::Volume('100%');
while (1) {
print ".";
Win32::Sound::Play("SystemQuestion");
Win32::Sound::Stop();
sleep(30);
}
Is there a way I create a file that I could burn to CD with 60 minutes of this beeping that will play back on an audio CD player?
Thanks!
rkg