Поправить скрипт на Perl

Задание закрыто
Статус рабочей области:Закрыта по истечению срока выполнения работ
Стоимость:500 рублей
Срок выполнения:1 день
Варианты оплаты:Без предоплаты
Дата публикации:2018-09-25 12:25
Был(а) на сайте:2023-09-22 13:33

Поправить скрипт на Perl

 
Задача

Поправить скрипт Perl, а конкретно поменять смс сервис отправки смс с p1sms.ru на sms.ru

sub send_sms {
# main variables
my $num = shift; # Number to send SMS to.
my $msg = shift; # Message to send.
my $user = "***";
my $pass = "***";
my $from = "TEST";
my $url = 'https://95.213.129.83/xml/';

my $text = '<message type="sms"><sender>' . $from .'</sender>
<text>' . $msg . '</text><abonent phone="' . $num .
'" number_sms="1" client_id_sms="' . time . '" time_send="'
. strftime("%F %R", localtime time) . '" /></message>';

# full SMS to send
my $sms ='<?xml version="1.0" encoding="utf-8" ?><request>
<security><login value="' . $user . '" /><password value="'
. $pass . '" /></security>' . $text . '</request>';
$sms =~ s/(\r|\n)//g;

# make user agent
m...

Видеть полную информацию и оставлять заявки могут только авторизованные пользователи.
Исполнитель по этому заданию выбран.
Заявок нет

Оставлять заявки могут только авторизованные пользователи.

Другие открытые задания:

Ищу Админа в группы ВК 600 р.

Бюджет: 600 р. Для работы нужен АЙФОН!!! Ищу админа в свои группы! У тебя в управлении будет много групп, нужно отвечать на смс шаблонами и публиковать готовые посты в течении д…

Координатор проекта для работы в соцсетях60 000 р.

Бюджет: 60 000 р. Координатор образовательного проекта в соцсетях Задачи: 1. Размещение готового контента в соцсетях (макеты, посты) 2. Продвижение образовательного продукта в …

Размещение объявлений на авито5 000 р.

Бюджет: 5 000 р. От вас просто размещение на вашем аккаунте. Занимаюсь перепродажей электроники и других вещей. Провисеть должны до продажи. Можно несколько объявлений и несколько а…

поиск заданий