Text To Speech (TTS) Messaging

SMS/TTS/Voice Gateway - Send TTS message : Perl Example

##################################################
## Example of using SMS Matrix HTTP API in Perl
## Sending Text-to-Speech message

use LWP::UserAgent;
use HTTP::Request::Common;

my $ua = LWP::UserAgent->new();
my $res = $ua->request
(
 POST 'http://www.smsmatrix.com/matrix_tts',
 Content_Type  => 'application/x-www-form-urlencoded',
 Content       => [ 'username' => 'user@hotmail.com',
                    'password' => 'mypassword123',
                    'phone'    => '12506063167', ## Phone number
                    'gender'   => 'male',        ## Optional ('female' is default)
                    'repeat'   => 1,             ## Optional (0 is default)
                    'language' => 'us',          ## Optional ('us','fr' or 'es', 'us' is default)
                    'txt' => 'Adam, web server at location number two is down. Please come ASAP.' ]
);

if ($res->is_error) { die "HTTP Error\n"; }

print "Matrix API Response: " . $res->content . "\n\n";