Wie man SMS von Perl aus sendet
Das folgende Beispiel zeigt, wie Sie HTTP-Anfragen verwenden können, um SMS-Nachrichten von Perl aus über ein SMS-Gateway zu senden. Das Perl-Programm legt zunächst alle wichtigen Variablen fest, die für das Senden der Nachricht verwendet werden. Dann erstellt es den String für das Senden der Nachricht und initiiert schließlich die HTTP-Anfrage. Die Antwortnachricht wird ebenfalls vom Programm ausgegeben.
Was ist eine Perl-SMS-API?
Die Perl-SMS-API ermöglicht das Senden von SMS-Nachrichten aus einem in Perl geschriebenen Programm. Sie verwendet HTTP-Anfragen und SSL-verschlüsselte Kommunikation, um die SMS-Sendeanfrage an das SMS-Gateway weiterzuleiten.
Voraussetzungen
SMS von Perl aus senden
- Öffnen Sie Notepad
- Erstellen Sie eine neue Datei
- Kopieren Sie den Beispielcode von dieser Seite
- Speichern Sie die Datei als HttpApiTester.pl
- Öffnen Sie die Eingabeaufforderung
- Navigieren Sie zum Ordner, in dem Sie die Perl-Datei gespeichert haben
- Geben Sie 'perl HttpApitester.pl' in die Eingabeaufforderung ein
- Drücken Sie Enter, um die Perl-Datei auszuführen
Perl-SMS-Quellcode-Beispiel
Der folgende Beispiel-Quellcode in Perl ist frei verwendbar. Sie können ihn einfach in Ihr Projekt implementieren oder den Quellcode anpassen, um ihn für andere Projekte oder Anwendungen zu verwenden. Wenn Sie dieses Beispiel nur ausführen und testen möchten, müssen Sie lediglich die oben genannten Anweisungen befolgen oder das Tutorial-Video ansehen, das zeigt, wie Sie eine Perl-Datei für den Quellcode erstellen und ihn über die Eingabeaufforderung ausführen.
#!/usr/bin/perl use strict; use warnings; use Encode; require HTTP::Request; require LWP::UserAgent; sub main { my $username = "john"; my $password = "Xc3ffs"; my $messagetype = "SMS:TEXT"; my $httpUrl = "https://127.0.0.1:9508/"; my $recipient = Encode::encode("utf8", "+36201324567"); my $messagedata = Encode::encode("utf8", "TestMessage"); my $sendString = $httpUrl."api?action=sendmessage"."&username=" .$username."&password=" .$password."&recipient=".$recipient."&messagetype=" .$messagetype."&messagedata=".$messagedata; 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"; print $response->content; } # Call main. main();
Schritt 1 - Öffnen Sie eine Texteditor-Anwendung
Um den obigen Beispielcode ausführen zu können, müssen Sie zunächst eine Perl-Datei dafür erstellen. Für diesen Vorgang benötigen Sie nur einen Texteditor. Sie können einen benutzerdefinierten Texteditor herunterladen, aber die standardmäßige Notepad-Anwendung unter Windows reicht ebenfalls aus. Wie in Abbildung 1 gezeigt, öffnen Sie einfach die Notepad-Anwendung von Ihrem Desktop aus.
Schritt 2 - Kopieren Sie den Quellcode
Der nächste Schritt besteht darin, den Quellcode zu erhalten. Dies ist eine einfache Aufgabe, da der Code auf dieser Seite zu finden ist. Sie müssen ihn also nur kopieren. Wie in Abbildung 2 zu sehen ist, gehen Sie einfach zum Beispielcode-Abschnitt auf dieser Seite, markieren Sie den gesamten Quellcode und drücken Sie Strg+C auf Ihrer Tastatur, um den Quellcode in die Zwischenablage zu kopieren.
Schritt 3 - Fügen Sie den Code in Ihre Textdatei ein
Als Nächstes müssen Sie den kopierten Quellcode in Ihre leere Textdatei einfügen. Dazu navigieren Sie einfach zur Textdatei und drücken Strg+V auf Ihrer Tastatur. Durch diese Aktion wird der Quellcode in Ihre Textdatei eingefügt, wie in Abbildung 3 dargestellt.
Schritt 4 - Speichern Sie den Text als Perl-Datei
Um die Perl-Datei zu erstellen, müssen Sie die Textdatei einfach mit der Dateierweiterung der Perl-Dateien speichern. Diese Erweiterung ist .pl. Wählen Sie also die Option "Speichern unter" im Editor, wie in Abbildung 4 zu sehen, und nachdem Sie einen Namen für die Datei vergeben haben, fügen Sie die Dateierweiterung '.pl' an und klicken Sie auf "Speichern". Durch diese Aktion wird die Perl-Datei erstellt, die Sie benötigen, um das Perl-SMS-Beispiel auszuführen.
Schritt 5 - Öffnen Sie die Eingabeaufforderung
Der letzte Hauptschritt dieser Anleitung besteht darin, die zuvor erstellte Perl-Datei auszuführen. In diesem Fall werden Sie das Beispiel über die Eingabeaufforderung ausführen. Sie können die Eingabeaufforderung einfach öffnen, indem Sie den Datei-Explorer öffnen und, wie in Abbildung 5 gezeigt, einfach 'cmd' in die Adressleiste eingeben und dann die Eingabetaste drücken. Wenn Sie im Datei-Explorer in den Ordner navigieren, in dem Sie die Perl-Datei gespeichert haben, verwendet die Eingabeaufforderung diesen Speicherort als Standard, sodass Sie die Perl-Datei direkt ausführen können.
Schritt 6 - Führen Sie die Perl-Datei aus
Die letzte Aktion, die Sie durchführen müssen, ist das Initiieren des Befehls, der die Perl-Datei ausführt. Dies ist ein einfacher Befehl; Sie müssen lediglich 'perl *Dateiname*.pl' in die Eingabeaufforderung eingeben, wie in Abbildung 6 dargestellt. Nachdem Sie die Eingabetaste gedrückt haben, führt die Perl-Datei die enthaltenen Befehle aus und sendet die Testnachricht. Die HTTP-Anfrage und Antwort des SMS-Gateways werden in der Eingabeaufforderung angezeigt.
Schritt 7 - Überprüfen Sie das Sendergebnis im Ozeki-Protokoll
Ozeki 10 SMS Gateway stellt sicher, dass Sie überprüfen können, welche Nachrichten von Ihrer Anwendung gesendet wurden, da der HTTP-API-Dienst jedes Ereignis protokolliert, das während seiner Aktivierung auftritt. Wenn Sie also das SMS Gateway öffnen und die Details des HTTP-API-Dienstes auswählen, können Sie die Ereignisse einsehen. Wie in Abbildung 7 zu sehen ist, hat der Dienst ein Ereignis protokolliert, als das Perl-Programm die HTTP-Anfrage an den Dienst gesendet hat.
Die Ereignisse, die während des Sendens der Nachricht aufgetreten sind, können ebenfalls über die Protokolle überprüft werden. Öffnen Sie dazu die HTTP-API-Benutzerverbindung, die Sie zuvor konfigurieren mussten. Abbildung 8 zeigt, wie die Verbindung die HTTP-Anfrage verarbeitet und die Nachricht an den Empfänger sendet, den Sie in Ihrem Perl-SMS-Beispielprogramm angegeben haben.
Zusammenfassung
In diesem Artikel haben wir Ihnen Informationen darüber gegeben, wie Sie SMS-Nachrichten mit Perl versenden können. Wir haben auch einen Beispielcode eingefügt, den Sie für den Implementierungsprozess verwenden können. Die Einrichtung einer Lösung, die die Programmiersprache Perl zum Versenden von SMS nutzt, erleichtert die Integration der SMS-Sende-Lösung in Ihr Kommunikationssystem.
Wenn Sie weitere Programmiersprachen in Ihr Kommunikationssystem integrieren möchten, besuchen Sie gerne die Artikel über andere mit dem Ozeki SMS Gateway kompatible Programmiersprachen, wie: Java.
Ihr nächster Schritt besteht nun darin, das Ozeki SMS Gateway herunterzuladen und diese Lösung sofort zu konfigurieren! Alles ist vorhanden, um es in weniger als 10 Minuten zum Laufen zu bringen.
More information