According to the Audio::Data docs, + is overloaded for additive mixing of two Data objects. So just create a second Data object for your second tone, add them, and save it back to the original object. Make sure when you call silence() that you are not overwriting the original data. You may have to use ->append($data_object->silence(...)) instead of calling silence() directly.

If, instead, you are trying to concatenate sounds (one sound plays after the other... for instance, a monotonic telephone dialing sequence), then you will have to use appends. Regardless, right now you are just overwriting your previous data with the last tone (or possibly the silence()).

Check the CPAN docs, they are very clear. It seems like you don't quite understand how Audio::Data represents and processes data. It's sample-based, not some group of functional representations (which could, theoretically, happily co-exist... but even so the usage syntax would probably be different than what you have).

~e

In reply to Re: PERL and DTMF by eweaver
in thread PERL and DTMF by perlphreak

Title:
Use:  <p> text here (a paragraph) </p>
and:  <code> code here </code>
to format your post, it's "PerlMonks-approved HTML":


  • Posts are HTML formatted. Put <p> </p> tags around your paragraphs. Put <code> </code> tags around your code and data!
  • Titles consisting of a single word are discouraged, and in most cases are disallowed outright.
  • Read Where should I post X? if you're not absolutely sure you're posting in the right place.
  • Please read these before you post! —
  • Posts may use any of the Perl Monks Approved HTML tags:
    a, abbr, b, big, blockquote, br, caption, center, col, colgroup, dd, del, details, div, dl, dt, em, font, h1, h2, h3, h4, h5, h6, hr, i, ins, li, ol, p, pre, readmore, small, span, spoiler, strike, strong, sub, summary, sup, table, tbody, td, tfoot, th, thead, tr, tt, u, ul, wbr
  • You may need to use entities for some characters, as follows. (Exception: Within code tags, you can put the characters literally.)
            For:     Use:
    & &amp;
    < &lt;
    > &gt;
    [ &#91;
    ] &#93;
  • Link using PerlMonks shortcuts! What shortcuts can I use for linking?
  • See Writeup Formatting Tips and other pages linked from there for more info.