$ perl -e ' local $/; $w=<>; open(F,">","/dev/dsp") && print F $w; ' /usr/local/mozilla/res/samples/test.wav
plays a wav on my linux box. YMMV
you could also move some of your calculations that don't change out of the add_tone sub.
In reply to Re: DTMF Tone Generator
by zengargoyle
in thread DTMF Tone Generator
by Mr. Muskrat
| For: | Use: | ||
| & | & | ||
| < | < | ||
| > | > | ||
| [ | [ | ||
| ] | ] |