/ Published in: Perl
Expand |
Embed | Plain Text
Copy this code and paste it in your HTML
use LWP::UserAgent; use HTTP::Request::Common; use JSON(); my $msg = { password => 'mypass', phone => '12502012503', # comma delimited list language => 'us', # optional gender => 'male', # optional callerid => '12501112233', # optional response => 0, # optional msg => [ 'http://www.myserver.com/voices/welcome_prompt.wav', 'This text will be converted to voice by TTS engine.', 'http://www.myserver.com/voices/segment2.mp3' ] }; my $ua = new LWP::UserAgent; my $res = $ua->request ( POST 'http://www.smsmatrix.com/matrix_vtts', Content_Type => 'application/json', Content => JSON::to_json ($msg) );
URL: http://www.smsmatrix.com/?sms-gateway