Odbieranie SMS w Perlu

Na tej stronie dowiesz się, jak możesz wykorzystać swoją aplikację Perl do odbierania wiadomości SMS. Ten przykładowy kod źródłowy w Perlu jest w stanie zbierać przychodzące wiadomości z Bramki SMS i używać ich w aplikacji. Wykonuje tę operację za pomocą żądania HTTP. Ten przewodnik pokazuje, jak łatwo można stworzyć aplikację w Perlu i uruchomić ją na swoim komputerze. Więc zaczynajmy już teraz.

Co to jest Perl SMS API?

Perl SMS API zapewnia możliwość wysyłania wiadomości SMS z programu napisanego w Perlu. Wykorzystuje żądania HTTP i szyfrowaną komunikację SSL do przekazania żądania wysłania SMS do Bramki SMS.

Wymagania wstępne

• Zainstalowany Perl
• Zainstalowana Bramka SMS Ozeki 10
• Skonfigurowane połączenie HTTP Server

Odbieranie SMS w Perlu

1. Otwórz Notatnik
2. Skopiuj i wklej przykładowy kod z tej strony
3. Zapisz plik jako ReceiveSMS.pl
4. Otwórz Bramkę SMS Ozeki i wybierz połączenie HTTP Server
5. Otwórz formularz HTML połączenia HTTP Server
6. Wyślij kilka testowych wiadomości
7. Otwórz Wiersz polecenia
8. Wpisz 'perl ReceiveSMS.pl' w Wierszu polecenia i naciśnij Enter

Poniższy przykładowy kod można bezpłatnie wykorzystać w swoim własnym rozwiązaniu lub aplikacji i można go modyfikować według własnych potrzeb. Przykładowy kod może zbierać wiadomości z Bramki SMS i używać ich w aplikacji Perl. Jeśli chcesz przetestować przykład, po prostu postępuj zgodnie z instrukcjami krok po kroku poniżej lub sprawdź wideo, które wyraźnie pokazuje wszystkie kroki, które należy wykonać, aby uruchomić przykład SMS w Perlu.

#!/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";
}

Krok 1 - Otwórz Notatnik

Pierwszą rzeczą, którą musisz wykonać, aby ukończyć ten przewodnik, jest utworzenie pliku Perl, który musisz uruchomić, aby zobaczyć, jak pobiera wiadomości SMS z Bramki SMS. W tym momencie musisz otworzyć aplikację Notatnik na swoim komputerze, aby móc utworzyć plik Perl. W tym celu, tak jak na Rysunku 1, kliknij jej ikonę na pulpicie.

Krok 2 - Skopiuj kod źródłowy Perla z tej strony

Następnie musisz pobrać kod źródłowy Perla z tej strony, aby użyć go na swoim komputerze. Więc po prostu przewiń w górę do sekcji z przykładowym kodem i zaznacz cały kod źródłowy. Następnie, jak widać na Rysunku 2, musisz skopiować go do schowka. Można to zrobić, naciskając Ctrl+C na klawiaturze.

Krok 3 - Wklej kod do pliku tekstowego

Po skopiowaniu kodu źródłowego Perl z tej strony, należy umieścić go w dokumencie tekstowym. Aby to zrobić, przejdź do aplikacji Notatnik, którą wcześniej otworzyłeś, i jak widać na Rysunku 3, naciśnij Ctrl+V na klawiaturze, aby wkleić cały kod źródłowy do dokumentu tekstowego.

Krok 4 - Zapisz tekst jako plik Perl

Kod źródłowy jest teraz umieszczony w dokumencie tekstowym, ale nadal nie ma odpowiedniego formatu pliku. Nie jest to jednak duży problem, można go łatwo rozwiązać za pomocą Notatnika. Wystarczy wybrać opcję 'Zapisz jako', a tutaj, po nadaniu nazwy pliku, użyj rozszerzenia '.pl', jak pokazuje Rysunek 4. Jeśli klikniesz 'Zapisz', plik zostanie zapisany w odpowiednim formacie Perl, który będzie potrzebny do późniejszego wykonania.

Krok 5 - Wyślij kilka testowych wiadomości

Po skonfigurowaniu pliku Perl, potrzebujesz kilku wiadomości w folderze skrzynki odbiorczej. Aby szybko zakończyć test, możesz symulować przychodzące wiadomości za pomocą połączenia HTTP Server w SMS Gateway. Jeśli jeszcze nie skonfigurowałeś tego połączenia, tutaj możesz zobaczyć jak skonfigurować połączenie HTTP Server. Otwórz SMS Gateway i wybierz połączenie HTTP Server. W menu połączenia otwórz formularz HTML (Rysunek 5). Tutaj możesz napisać kilka wiadomości do SMS Gateway, ustawiając odbiorcę na 'Ozeki'.

Krok 6 - Otwórz Wiersz polecenia

Aby uruchomić kod Perl, potrzebujesz Wiersza polecenia, ponieważ zapewnia on prosty sposób wykonania kodu. Najpierw otwórz Eksplorator plików i przejdź do folderu, w którym zapisałeś plik Perl. Tutaj, jak widać na Rysunku 6, wpisz 'cmd' w Eksploratorze plików. Jeśli naciśniesz Enter, Wiersz polecenia otworzy się w nowym oknie.

Krok 7 - Uruchom przykład SMS w Perl

Ostatnią rzeczą, którą musisz zrobić, jest wykonanie programu Perl. W tym celu wystarczy wykonać proste polecenie w Wierszu polecenia. Polecenie to 'perl *nazwa_pliku*.pl', jak pokazuje Rysunek 7. Następnie naciśnij Enter, aby uruchomić przykładowy program. Program wypisuje żądanie HTTP wysłane do SMS Gateway, a także odpowiedź z SMS Gateway. Zawiera ona wszystkie wiadomości odebrane przez SMS Gateway.

Podsumowanie

W powyższym artykule nauczyłeś się odbierać SMS-y za pomocą Perla. Używanie skryptu Perla do zbierania przychodzących wiadomości oznacza, że możesz wykorzystać te wiadomości w projekcie PHP. Możesz zacząć automatyzować odbieranie i wysyłanie SMS-ów dzięki mocy Perla i Ozeki SMS Gateway. Dzięki Ozeki SMS Gateway nie będziesz miał problemów z wydajnością dzięki możliwości obsługi 1000 SMS-ów na sekundę. To znacznie poprawi komunikację w Twojej organizacji lub z klientami.

Odwiedź naszą stronę internetową, jeśli chcesz dowiedzieć się więcej o wszystkich językach programowania, które obsługuje Ozeki SMS Gateway. Możesz dotrzeć do artykułu o zarządzaniu SMS-ami za pomocą Pythona.

Jeśli chcesz pracować z wysokowydajnym oprogramowaniem SMS Gateway, pobierz Ozeki SMS Gateway!