Prijímať SMS v Perle

Na tejto stránke sa dozviete, ako môžete použiť svoju Perl aplikáciu na prijímanie SMS správ. Tento príklad Perl zdrojového kódu je schopný zbierať prichádzajúce správy z SMS brány a používať ich v aplikácii. Túto operáciu vykonáva pomocou HTTP požiadavky. Tento sprievodca ukazuje, ako jednoducho môžete vytvoriť Perl aplikáciu a spustiť ju na svojom počítači. Takže, poďme na to.

Čo je Perl SMS API?

Perl SMS API zabezpečuje možnosť odosielania SMS správ z programu napísaného v Perli. Používa HTTP požiadavky a SSL šifrovanú komunikáciu na preposlanie požiadavky na odoslanie SMS do SMS brány.

Predpoklady Prijímať SMS v Perle
  1. Otvorte Poznámkový blok
  2. Skopírujte a vložte príklad kódu z tejto stránky
  3. Uložte súbor ako ReceiveSMS.pl
  4. Otvorte Ozeki SMS bránu a vyberte HTTP Server pripojenie
  5. Otvorte HTML formulár HTTP Server pripojenia
  6. Odošlite nejaké testovacie správy
  7. Otvorte Príkazový riadok
  8. Napíšte 'perl ReceiveSMS.pl' do Príkazového riadku a stlačte Enter

Video 1 - Ako prijímať SMS v Perle (Video návod)

Tento príklad kódu nižšie je voľne použiteľný vo vašom vlastnom riešení alebo aplikácii a môžete ho upraviť, ak chcete. Príklad kódu dokáže zbierať správy z SMS brány a používať ich v Perl aplikácii. Ak chcete otestovať príklad, jednoducho postupujte podľa krokov uvedených nižšie alebo si pozrite video, ktoré jasne ukazuje všetky kroky, ktoré musíte vykonať, aby ste spustili Perl SMS príklad.

#!/usr/bin/perl 
use strict; 
use warnings; 
use XML::Simple;
use Data::Dumper;
require HTTP::Request;
require LWP::UserAgent;

sub main
{
    my $username = "john";
	my $password = "Xc3ffs";
	my $httpUrl = "https://127.0.0.1:9508/";
	my $folder = "inbox";
	my $limit = "3";

    my $sendString = $httpUrl."api?action=receivemessage&username="
                    .$username."&password=".$password."&folder="
                    .$folder."&limit=".$limit
                    ."&messagedata=&afterdownload=delete";
    
    print "Odosielanie html požiadavky: ".$sendString."\n\n";

	my $request = HTTP::Request->new(GET => $sendString);
	my $ua = LWP::UserAgent->new (
   			ssl_opts => { verify_hostname => 0 },
			);
	my $response = $ua->request($request);
	print "Prijatá HTTP odpoveď :\n";

	DisplayMessages($response->content)
}

main();

sub DisplayMessages {
	my $data = XMLin(@_);
	my $sender = "";
	my $text = "";
 	if($data->{data}->{message} eq 'No more messages.')	{
 		print "Schránka je prázdna!";
 		return;
 	}

	if (ref($data->{data}->{message}) eq 'ARRAY') {
		foreach my $value (@{ $data->{data}->{message} }) {
			$sender = $value->{originator};
			$text =  $value->{messagedata};
			DisplayMessage($sender,$text);
		}
	} 
	else {
		$sender = $data->{data}->{message}->{originator};
		$text = $data->{data}->{message}->{messagedata};
		DisplayMessage($sender,$text);
	}
}

sub DisplayMessage {
	print $_[0].": ".$_[1]."\n";
}
Krok 1 - Otvorte Poznámkový blok

Prvá vec, ktorú musíte urobiť, aby ste dokončili tento sprievodca, je vytvoriť Perl súbor, ktorý musíte spustiť, aby ste videli, ako získava SMS správy z SMS brány. Takže v tomto bode musíte otvoriť aplikáciu Poznámkový blok na svojom počítači, aby ste mohli vytvoriť Perl súbor. Preto, ako je znázornené na obrázku 1, kliknite na jeho ikonu na pracovnej ploche.

otvoriť poznámkový blok
Obrázok 1 - Otvorenie textového editora Poznámkový blok

Krok 2 - Skopírujte Perl zdrojový kód z tejto stránky

Ďalej musíte získať Perl zdrojový kód z tejto stránky, aby ste ho mohli použiť na svojom počítači. Takže jednoducho prejdite na časť s príkladom kódu a označte celý zdrojový kód. Potom, ako je znázornené na obrázku 2, musíte ho skopírovať do schránky. To môžete urobiť stlačením klávesov Ctrl+C na klávesnici.

kopírovať perl kód
Obrázok 2 - Kopírovanie Perl zdrojového kódu z webovej stránky

Krok 3 - Vložte kód do textového súboru

Po skopírovaní Perl zdrojového kódu z tejto stránky ho musíte vložiť do textového dokumentu. Ak to chcete urobiť, prejdite do aplikácie Poznámkový blok, ktorú ste predtým otvorili, a ako vidíte na obrázku 3, stlačte klávesovú skratku Ctrl+V, aby ste vložili celý zdrojový kód do textového dokumentu.

vložiť perl sms zdrojový kód
Obrázok 3 - Vloženie Perl SMS zdrojového kódu do poznámkového bloku

Krok 4 - Uložte text ako Perl súbor

Zdrojový kód je teraz umiestnený v textovom dokumente, ale stále nemá správny formát súboru. Ale to nie je veľký problém, môžete ho ľahko vyriešiť pomocou Poznámkového bloku. Stačí vybrať možnosť 'Uložiť ako' a tu, po zadaní názvu súboru, použite príponu súboru '.pl', ako to ukazuje obrázok 4. Ak kliknete na 'Uložiť', súbor bude uložený v správnom formáte Perl, ktorý budete potrebovať na neskoršie spustenie.

uložiť perl súbor
Obrázok 4 - Uloženie súboru ako ReceiveSMS.pl

Krok 5 - Odošlite nejaké testovacie správy

Po nastavení Perl súboru potrebujete nejaké správy do priečinka doručenej pošty. Ak chcete rýchlo dokončiť test, môžete simulovať prichádzajúce správy pomocou pripojenia HTTP Server v SMS Gateway. Ak ste toto pripojenie ešte nenakonfigurovali, tu môžete vidieť ako nakonfigurovať pripojenie HTTP Server. Takže otvorte SMS Gateway, a vyberte pripojenie HTTP Server. V ponuke pripojenia otvorte HTML formulár (Obrázok 5). Tu môžete napísať nejaké správy do SMS Gateway nastavením príjemcu na 'Ozeki'.

simulovať prichádzajúce sms
Obrázok 5 - Simulácia prichádzajúcich SMS

Krok 6 - Otvorte príkazový riadok

Ak chcete spustiť Perl kód, potrebujete príkazový riadok, pretože poskytuje jednoduchý spôsob, ako vykonať kód. Takže najprv otvorte Průzkumníka súborov a prejdite do priečinka, kde ste uložili svoj Perl súbor. Tu, ako vidíte na obrázku 6, napíšte 'cmd' do Průzkumníka súborov. Ak stlačíte Enter, príkazový riadok sa otvorí v novom okne.

Obrázok 6 - Otvorenie príkazového riadku

Krok 7 - Spustite Perl SMS príklad

Posledná vec, ktorú musíte urobiť, je spustiť Perl program. Na to stačí vykonať jednoduchý príkaz v príkazovom riadku. Príkaz je 'perl *názov súboru*.pl' ako to ukazuje obrázok 7. Potom stačí stlačiť Enter, aby ste spustili príkladový program. Program vytlačí HTTP požiadavku, ktorá bola odoslaná do SMS Gateway, a tiež vytlačí odpoveď od SMS Gateway. Tá obsahuje všetky správy, ktoré boli prijaté SMS Gateway.

spustiť perl kód
Obrázok 7 - Spustenie perl kódu v príkazovom riadku

Záverečné myšlienky

V článku vyššie ste sa dozvedeli o prijímaní SMS pomocou Perl. Použitie Perl skriptu na zber prichádzajúcich správ znamená, že tieto správy môžete použiť v PHP projekte. Môžete začať automatizovať prijímanie a odosielanie SMS s pomocou Perl a Ozeki SMS Gateway. Vďaka Ozeki SMS Gateway nebudete mať žiadne problémy s výkonom vďaka 1000 SMS za sekundu kapacite gateway softvéru. To výrazne zlepší komunikáciu vo vašej organizácii alebo s vašimi zákazníkmi.

Navštívte našu webovú stránku, ak sa chcete dozvedieť o všetkých programovacích jazykoch, ktoré Ozeki SMS Gateway zvláda. Môžete si prečítať článok o správe SMS pomocou PHP alebo Python.

Ak chcete pracovať s vysokovýkonným SMS Gateway softvérom, stiahnite si Ozeki SMS Gateway!