Prejemanje SMS v Perl

Na tej strani se boste lahko naučili, kako lahko uporabite svojo Perl aplikacijo za prejemanje SMS sporočil. Ta primer Perl kode lahko zbira dohodna sporočila iz SMS prehoda in jih uporabi v aplikaciji. To operacijo izvede z uporabo HTTP zahtev. Ta vodič prikazuje, kako enostavno lahko ustvarite Perl aplikacijo in jo zaženete na svojem računalniku. Torej, začnimo že zdaj.

Perl SMS API omogoča pošiljanje SMS sporočil iz programa, napisanega v Perl. Uporablja HTTP zahteve in šifrirano komunikacijo s SSL za posredovanje zahteve za pošiljanje SMS na SMS prehod.

• Nameščen Perl
• Nameščen Ozeki 10 SMS prehod
• Konfigurirana povezava HTTP strežnika

1. Odprite Notepad
2. Kopirajte in prilepite primer kode s te strani
3. Shranite datoteko kot ReceiveSMS.pl
4. Odprite Ozeki SMS prehod in izberite povezavo HTTP strežnika
5. Odprite HTML obrazec povezave HTTP strežnika
6. Pošljite nekaj testnih sporočil
7. Odprite Ukazno vrstico
8. Vtipkajte 'perl ReceiveSMS.pl' v Ukazno vrstico in pritisnite Enter

Spodnja primer kode je brezplačna za uporabo v vaši lastni rešitvi ali aplikaciji in jo lahko spremenite, če želite. Primer kode lahko zbira sporočila iz SMS prehoda in jih uporabi v Perl aplikaciji. Če želite preizkusiti primer, sledite navodilom korak za korakom spodaj ali preverite video, ki jasno prikazuje vse korake, ki jih morate izvesti za izvedbo Perl SMS primera.

#!/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 "Sending html request: ".$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 "Http response received :\n";

	DisplayMessages($response->content)
}

main();

sub DisplayMessages {
	my $data = XMLin(@_);
	my $sender = "";
	my $text = "";
 	if($data->{data}->{message} eq 'No more messages.')	{
 		print "The inbox is empty!";
 		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";
}

Prva stvar, ki jo morate opraviti za dokončanje tega vodiča, je ustvariti Perl datoteko, ki jo morate izvesti, da vidite, kako pridobi SMS sporočila iz SMS prehoda. Torej, na tej točki morate odpreti aplikacijo Notepad na svojem računalniku, da lahko ustvarite Perl datoteko. Za to, kot je prikazano na Sliki 1, kliknite na njeno ikono na namizju.

Nato morate pridobiti Perl izvorno kodo s te strani, da jo uporabite na svojem računalniku. Torej, samo pomaknite se navzgor do odseka s primerom kode in označite celotno izvorno kodo. Nato, kot lahko vidite na Sliki 2, jo morate kopirati v svojo odložišče. To lahko naredite s pritiskom na Ctrl+C na tipkovnici.

3. korak - Prilepite kodo v besedilno datoteko

Ko kopirate izvorno kodo Perl s te strani, jo morate vstaviti v besedilno dokument. Če želite to narediti, pojdite v aplikacijo Notepad, ki ste jo odprli prej, in kot vidite na sliki 3, pritisnite Ctrl+V na tipkovnici, da prilepite celotno izvorno kodo v besedilni dokument.

Izvorna koda je zdaj v besedilnem dokumentu, vendar še vedno nima prave oblike datoteke. Vendar to ni večji problem, saj ga lahko enostavno rešite z Notepad. Samo izberite možnost 'Shrani kot' in tukaj, ko datoteki daste ime, uporabite končnico '.pl', kot prikazuje slika 4. Če kliknete 'Shrani', bo datoteka shranjena v pravi obliki Perl, ki jo boste potrebovali za kasnejše izvajanje.

Ko nastavite datoteko Perl, potrebujete nekaj sporočil v vaš mapi »prejeto«. Da hitro zaključite test, lahko simulirate dohodna sporočila s povezavo HTTP strežnika v SMS Gateway. Če te povezave še niste nastavili, si lahko ogledate kako nastaviti povezavo HTTP strežnika. Odprite SMS Gateway, in izberite povezavo HTTP strežnika. V meniju povezave odprite HTML obrazec (slika 5). Tukaj lahko napišete nekaj sporočil v SMS Gateway tako, da nastavite prejemnika na 'Ozeki'.

Za zagon kode Perl potrebujete ukazno vrstico, saj omogoča preprost način izvajanja kode. Najprej odprite Raziskovalec datotek in se pomaknite v mapo, kjer ste shranili svojo datoteko Perl. Tukaj, kot vidite na sliki 6, vpišite 'cmd' v Raziskovalca datotek. Če pritisnete Enter, se bo ukazna vrstica odprla v novem oknu.

Zadnja stvar, ki jo morate storiti, je izvajanje programa Perl. Za to morate samo izvesti preprost ukaz v ukazni vrstici. Ukaz je 'perl *ime datoteke*.pl' kot prikazuje slika 7. Nato pritisnite Enter, da izvedete primer programa. Program izpiše HTTP zahtevo, ki je bila poslana v SMS Gateway, in tudi izpiše odzivno sporočilo iz SMS Gateway. To vsebuje vsa sporočila, ki jih je prejel SMS Gateway.

V zgornjem članku ste se naučili o prejemanju SMS z uporabo Perl. Uporaba skripta Perl za zbiranje dohodnih sporočil pomeni, da lahko ta sporočila uporabite v projektu PHP. Avtomatizirano prejemanje in pošiljanje SMS lahko začnete z močjo Perl in Ozeki SMS Gateway. Zahvaljujoč Ozeki SMS Gateway ne boste imeli težav z zmogljivostjo zaradi zmogljivosti 1000 SMS na sekundo programske opreme prehoda. To bo močno izboljšalo komunikacijo znotraj vaše organizacije ali z vašimi stranki.

Obiščite našo spletno stran, če se želite naučiti o vseh programskih jezikih, ki jih lahko obdela Ozeki SMS Gateway. Lahko dostopate do članka o upravljanju SMS z PHP ali Python.

Če želite delati z visoko zmogljivo programsko opremo SMS Gateway, prenesite Ozeki SMS Gateway!