Advanced Search

Return to Snippet

Revision: 30857
at August 24, 2010 05:12 by smsmatrix
Initial Code 
use LWP::UserAgent;
use HTTP::Request::Common;

# The voice file provided must be in mp3 or wave format.
# It will be converted to: 16Bit 8kHz mono wave format.

my $ua = LWP::UserAgent->new();
my $res = $ua->request
(
 POST 'http://www.smsmatrix.com/matrix_voice',
      Content_Type => 'form-data',
      Content      => [ username  => '[email protected]',
                        password  => 'pass8988',
                        phone     => '12502771720',  ## comma delimited list
                        voicefile => ['/tmp/november_sale.wav'],
                        response  => 1,  ## optional
                        callerid  => '16307791722'  ## optional
                      ]
);

if ($res->is_error) { die "HTTP Error\n"; }
print "Matrix API Response1: " . $res->content . "\n\n";
Initial URL 
http://www.smsmatrix.com/?sms-gateway
Initial Description 

                                

                                                            

                                    

                                        

                                        Initial Title
                                        

                                    

                                    
Send voice phone (mp3 or wave file) using www.smsmatrix.com Gateway

                                

                                                            

                                    

                                        

                                        Initial Tags
                                        

                                    

                                    
phone

                                

                                                            

                                    

                                        

                                        Initial Language
                                        

                                    

                                    
Perl