Готовый скрипт для отправки СМС под Perl
С помощью API можно осуществлять СМС-рассылку, а также другие функции, которые доступны в нашем личном кабинете.
Шаг 1 - Зарегистрируйтесь в нашем личном кабинете
На Ваш e-mail поступит пароль, который необходимо будет использовать в API.
Шаг 2 - Скачайте модуль
Скачайте Perl модуль отправки СМС-сообщений.
 
Cкрипт (sms.pl) для отправки смс (использует вышеуказанный модуль)
| 
			 
				 1
			 
			
				 2
			 
			
				 3
			 
			
				 4
			 
			
				 5
			 
			
				 6
			 
			
				 7
			 
			
				 8
			 
			
				 9
			 
			
				 10
			 
			
				 11
			 
			
				 12
			 
			
				 13
			 
			
				 14
			 
			
				 15
			 
			
				 16
			 
			
				 17
			 
			
				 18
			 
			
				 19
			 
			
				 20
			 
			
				 21
			 
			
				 22
			 
			
				 23
			 
			
				 24
			 
			
				 25
			 
			
				 26
			 
			
				 27
			 
			
				 28
			 
			
				 29
			 
			
				 30
			 
			
				 31
			 
			
				 32
			 
			
				 33
			 
			
				 34
			 
			
				 35
			 
			
				 36
			 
			
				 37
			 
			
				 38
			 
			
				 39
			 
			
				 40
			 
			
				 41
			 
			
				 42
			 
			
				 43
			 
			
				 44
			 
			
				 45
			 
			
				 46
			 
			
				 47
			 
			
				 48
			 
		 | 
		
			#!/usr/bin/perl
				# sms.pl
				# use module
				use sms-prosto_ru;
				use Getopt::Std;
				  
				my %options;
				getopts("htp:n:m:",\%options);
				  
				if ($options{h}){
				    print <<EOF;
				Syntax: $0 [-h | -p 7xxxyyyzzzz -n senderName -t message]
				  
				    -h : This help message
				    -p : recipient phone /code>
				
				
				
				
				
				
				
				
				
				
				
				
				
				
				
				
				
				
				
				
				
				
				
				
				
				
				
				
				
				
				
				
				 |