Скрипт отправки СМС на 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>in international format
    -n : sender name, no more than 11 symbols Latin (GSM_0338)
    -m : message text, ASCII or UTF-8
    -t : test mode, message don`t rated and doesnt go
  
EOF
    exit;
} elsif (!$options{p}){
        die "need option: -p 7xxxyyyzzzz phone ";
} elsif (!$options{n}){
        die "need option: -n sender name\n";
} elsif (!$options{m}){
        die "need option: -m message text\n";
} else {
    my $test = 0;
    $test = 1 if $options{t};
  
# * @param $email, $passwrod - login info
# CHANGE THIS!!!
    my $email = 'user@mail.ru';
    my $pass = 'secret';
# * @param $phone - recipient phone n international format (like 7xxxyyyzzzz)
# * @param $text - message text, ASCII or UTF-8.
    print sms-prosto_ru::smsapi_push_msg_nologin_v1({
         test => $test, # For test without send the message and doesnt change balance
         email => $email,
         password => $pass,
         sender_name => $options{n},
         phone => $options{p},
         text => $options{m}
    });
exit 0;
}

Скачать готовый Perl модуль

Если у вас возникли какике-то вопросы, тогда оставте заявку и мы обязательно свяжемся с вами!

Нажимая кнопку, Вы даете согласие на обработку персональных данных в соответствии с условиями, указанными по ссылке

Спасибо за Вашу заявку! В ближайшее время мы с Вами свяжемся.

Не нашли, что искали? Оставьте Ваши контакты, и мы свяжемся с Вами в ближайшее время!

Нажимая кнопку, Вы даете согласие на обработку персональных данных в соответствии с условиями, указанными по ссылке

Спасибо за Вашу заявку! В ближайшее время мы с Вами свяжемся.

Выберите Ваш город