Ako vymazať SMS v Perle

Najjednoduchší spôsob, ako vymazať SMS z Perlu, je použiť vstavané HTTP/Rest SMS API Ozeki SMS Gateway. Keď použijete toto API, budete odosielať SMS správy vytvorením HTTP POST požiadavky na SMS bránu. HTTP POST požiadavka bude obsahovať správu formátovanú v json formáte. SMS brána odošle túto SMS na príjemcove telefónne číslo a vráti HTTP 200 OK odpoveď na vašu požiadavku.

Ukážka Perl kódu pre SMS nižšie demonštruje, ako môžete prijímať SMS pomocou HTTP REST SMS API Ozeki SMS Gateway s použitím knižnice Perl Ozeki.Libs.Rest. Táto knižnica je poskytovaná bezplatne a môžete ju používať a upravovať v akomkoľvek z vašich projektov.

DeleteSms.pl

use Ozeki::Libs::Rest::Configuration;
use Ozeki::Libs::Rest::MessageApi;
use Ozeki::Libs::Rest::Message;
use Ozeki::Libs::Rest::Folder;

my $configuration = new Ozeki::Libs::Rest::Configuration();
$configuration->{ Username } = "http_user";
$configuration->{ Password } = "qwe123";
$configuration->{ ApiUrl } = "http://127.0.0.1:9509/api";

my $msg = new Ozeki::Libs::Rest::Message();
#Na vymazanie konkrétnej správy musíte zmeniť tento ID atribút
$msg->{ ID } = "19fed2a2-da46-11eb-8339-ffacbeab4160";

my $api = new Ozeki::Libs::Rest::MessageApi($configuration);

my $result = $api->Delete(Ozeki::Libs::Rest::Folder->Inbox, $msg);

print($result);
	

Ako použiť Perl príklad pre SMS:

Tento Perl príklad pre SMS môže byť použitý v akejkoľvek Perl aplikácii. Na jeho použitie musíte pridať knižnicu Ozeki.Libs.Rest do vášho projektu. Po pridaní knižnice musíte vložiť direktívu using Ozeki.Libs.Rest; do hlavičkovej časti vášho Perl zdrojového kódu. To vám umožní používať triedy poskytované knižnicou Ozeki.Libs.Rest. Môžete použiť triedu Message na vytvorenie SMS. Môžete použiť triedu MessageApi na vymazanie SMS správ do SMS brány. SMS brána prepošle vašu správu do mobilnej siete buď cez bezdrôtové pripojenie alebo cez internet.

Zdrojový kód vysvetlený v tomto článku môže byť stiahnutý, použitý a upravený bezplatne.
Stiahnuť: DeleteSms.pl.zip (76.1Kb)

Súbor DeleteSms.pl.zip obsahuje knižnicu Ozeki.Libs.Rest, ktorá vám poskytuje všetky potrebné nástroje na odosielanie, prijímanie a mazanie SMS správ. Nájdete tu tiež projekt DeleteSms v zip súbore, ktorý obsahuje ukážkový kód, ktorý vám ukáže, ako vymazať SMS. Tento ukážkový kód je uvedený nižšie.

Na vymazanie SMS pomocou Perlu:

1. Stiahnite si súbor DeleteSms.pl.zip
2. Extrahujte .zip súbor zo stiahnutých súborov
3. Otvorte súbor DeleteSms.pl v ľubovoľnom textovom editore
4. Spustite Ozeki SMS Gateway
5. Vyberte http_user v karte Používatelia a aplikácie
6. Skontrolujte detaily správy v Doručenej pošte
7. Vložte ID SMS správy do kódu DeleteSms.pl
8. Spustite DeleteSms.pl na vymazanie SMS pomocou Perlu

Na odosielanie SMS z Perlu musíte najprv nainštalovať Ozeki SMS Gateway. SMS bránu je možné nainštalovať na rovnakom počítači, kde vyvíjate svoj Perl kód v Visual studio. Po inštalácii je ďalším krokom pripojenie Ozeki SMS Gateway k mobilnej sieti. Môžete odoslať testovaciu SMS z Ozeki GUI na overenie, že vaše mobilné pripojenie funguje. Posledným krokom na prípravu vášho prostredia je vytvorenie HTTP SMS API používateľského účtu. Vytvorte používateľa s používateľským menom "http_user" a heslom "qwe123", aby príklad fungoval bez úprav.

Po nastavení prostredia môžete spustiť svoj Perl kód.

Na odosielanie SMS z Perlu musí váš Perl vytvoriť HTTP požiadavku na SMS bránu. API URL je uvedené nižšie. Upozorňujeme, že IP adresa (127.0.0.1) by mala byť nahradená IP adresou vašej SMS brány. Ak je Ozeki SMS Gateway nainštalovaný na rovnakom počítači, kde beží Perl SMS aplikácia, môže to byť 127.0.0.1. Ak je nainštalovaný na inom počítači, mala by to byť IP adresa toho počítača.

http://127.0.0.1:9509/api?action=rest
	

Na autentifikáciu Perl SMS klienta musíte odoslať používateľské meno a heslo v base64 kódovanom reťazci na server v HTTP požiadavke. Použitý formát je: base64(používateľské meno+":"+heslo). V Perli môžete použiť nasledujúci kód na toto kódovanie:

my ($self, $Username, $Password) = @_;
my $Username_Password = "${Username}:${Password}";
my $Username_Password_encoded = encode_base64($Username_Password);
return "Basic ${Username_Password_encoded}";
	

Napríklad, ak zakódujete používateľské meno 'http_user' a heslo 'qwe123', dostanete nasledujúci base64 kódovaný reťazec: aHR0cF91c2VyOnF3ZTEyMw==. Na odoslanie

HTTP požiadavka na vymazanie SMS pomocou Perl

Na vymazanie SMS bude vaša Perl aplikácia odosielať HTTP požiadavku podobnú nižšie uvedenej. Upozorňujeme, že táto požiadavka obsahuje časť HTTP hlavičky a časť tela HTTP. Telo HTTP je reťazec dát zakódovaný v JSON. Obsahuje číslo príjemcu a text správy.

POST /api?action=deletemsg HTTP/1.1
Connection: TE, close
Content-Length: 153
Content-Type: application/json; charset=utf8
Authorization: Basic aHR0cF91c2VyOnF3ZTEyMw==
Host: 192.168.0.14:9509
Te: deflate,gzip;q=0.3
User-Agent: libwww-perl/6.43

{
	"folder":"inbox",
	"message_ids":	[
		"da837770-e3bd-4970-a824-579423d9b242"
	]
}
	

Na odoslanie SMS správ musíte do HTTP požiadavky zahrnúť nasledujúce riadky ako hlavičky. Upozorňujeme, že zaraďujeme typ obsahu a autorizačnú hlavičku.

Content-Type: application/json
Authorization: Basic QWxhZGRpbjpvcGVuIHNlc2FtZQ==
	

Keď SMS brána prijme túto požiadavku, vygeneruje HTTP odpoveď. HTTP odpoveď bude obsahovať stavový kód, ktorý indikuje, či bola požiadavka na odoslanie SMS úspešná alebo nie. Taktiež vráti štruktúru zakódovanú v JSON, ktorá vám poskytne užitočné informácie o odoslaní správy.

HTTP/1.1 200 OK
User-Agent: OZEKI 10.3.123 (www.myozeki.com)
Content-Type: application/json; charset=utf8
Last-Modified: Fri, 02 Jul 2021 16:00:35 GMT
Server: 10/10.3.123
Transfer-Encoding: chunked

{
	"http_code": 200,
	"response_code": "SUCCESS",
	"response_msg": "",
	"data": {
	  "folder": "inbox",
	  "message_ids": [
	    "da837770-e3bd-4970-a824-579423d9b242"
	  ]
	}
}
	

Príklad kódu nižšie je súčasťou DeleleSms.pl (Obrázok 3). Keď spustíte tento kód, vymaže správu s ID uvedeným v kóde. Poskytnuté ID nájdete v premennej 'ID'. Spustite kód a ten vyhľadá správu a vymaže ju. Ak ste oboznámení s programovacím jazykom Perl, kľudne kód upravte.

V tomto videu uvidíte kód v akcii. Ukážeme vám, ako spustiť kód a skontrolovať jeho výsledky. Začne sa otvoreným terminálom a otvoreným kódom a na konci vám ukáže prázdnu priečinok doručenej pošty. Video je dlhé len 1:14 a je ľahko sledovateľné. Nebudete mať problém s dodržaním krokov.

Na tejto stránke ste sa dočítali o tom, ako vymazať SMS správy z Perl pomocou HTTP REST SMS API Ozeki SMS brány. Teraz môžete vytvoriť podmienky na použitie stiahnuteľného Perl repozitára na vymazanie SMS správ. Toto riešenie môže byť prelomové vo vašom systéme správ vďaka dobre napísaným metódam a dobre navrhnutej SMS triede, ktorá vám umožňuje konfigurovať parametre SMS.

Ozeki SMS brána pre vás má oveľa viac, takže choďte a pozrite si ďalší zaujímavý článok. Odporúčam návod Ako stiahnuť najnovšiu Perl SMS knižnicu z Githubu pre viac informácií.

Stiahnite si Ozeki SMS bránu a nastavte si svoj systém hneď teraz!