Comment envoyer un SMS depuis Perl
La manière la plus simple d'envoyer un SMS depuis Perl est d'utiliser l'API HTTP/Rest SMS intégrée d'Ozeki SMS Gateway. Lorsque vous utilisez cette API, vous enverrez des SMS en effectuant une requête HTTP Post vers la passerelle SMS. La requête HTTP Post contiendra un message formaté en JSON. La passerelle SMS enverra ce SMS au téléphone du destinataire et renverra une réponse HTTP 200 OK à votre requête.
Code Perl pour envoyer un SMS vers un mobile
L'exemple de code Perl pour SMS ci-dessous montre comment envoyer un SMS en utilisant l'API HTTP Rest SMS d'Ozeki SMS Gateway avec la bibliothèque Perl Ozeki.Libs.Rest. Cette bibliothèque est fournie gratuitement, et vous pouvez l'utiliser et la modifier dans tous vos projets.
SendSms.pl
use Ozeki::Libs::Rest::Configuration;
use Ozeki::Libs::Rest::MessageApi;
use Ozeki::Libs::Rest::Message;
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();
$msg->{ ToAddress } = "+36201111111";
$msg->{ Text } = "Hello world!";
my $api = new Ozeki::Libs::Rest::MessageApi($configuration);
my $result = $api->Send($msg);
print($result->stringify);
Comment utiliser l'exemple Perl pour SMS :
Cet exemple Perl pour SMS peut être utilisé dans n'importe quelle application Perl. Pour l'utiliser, vous devez ajouter la bibliothèque Ozeki.Libs.Rest à votre projet. Après avoir ajouté la bibliothèque, vous devez placer la directive using Ozeki.Libs.Rest; dans la section d'en-tête de votre code source Perl. Cela vous permettra d'utiliser les classes fournies par la bibliothèque Ozeki.Libs.Rest. Vous pouvez utiliser la classe Message pour créer le SMS. Vous pouvez utiliser la classe MessageApi pour envoyer le SMS à la passerelle SMS. La passerelle SMS transmettra votre message au réseau mobile soit via une connexion sans fil, soit via Internet.
Télécharger SendSms.pl
Le code source expliqué dans cet article peut être téléchargé, utilisé et modifié gratuitement.
Téléchargement : SendSms.pl.zip (76.0Kb)
Que contient le fichier SendSms.pl.zip ?
Le fichier SendSms.pl.zip contient la bibliothèque Ozeki.Libs.Rest, qui vous donne tous les outils nécessaires pour envoyer et recevoir des SMS. Vous trouverez également le fichier SendSms.pl dans le zip, qui contient le code exemple pour vous montrer comment envoyer un SMS. Ce code exemple est listé ci-dessous.
Dépendances
Pour utiliser la bibliothèque Ozeki::Libs::Rest, vous devez installer quelques modules :
Ubuntu
$ sudo apt-get install libdatetime-perl $ cpan $ install JSON $ install UUID::Generator::PurePerl $ install UUID::Object
Comment installer les dépendances Perl sur Linux (Tutoriel vidéo)
Dans cette vidéo, nous vous montrons comment installer les dépendances de Perl sur un système d'exploitation Linux. La vidéo commence par l'ouverture d'un terminal et se termine par l'installation des dépendances. La vidéo ne dure que 1 minute 10, mais elle explique le processus de manière détaillée. Si vous regardez toute la vidéo, vous n'aurez aucun problème à reproduire les étapes.
Windows
cpanm DateTime cpanm UUID::Generator::PurePerl cpanm UUID::Object cpanm JSON
Comment installer les dépendances Perl sur Windows (Tutoriel vidéo)
Dans cette vidéo, nous vous montrons comment installer les dépendances de Perl sur un système d'exploitation Windows. La vidéo commence par l'ouverture d'une invite de commandes et se termine par l'installation de toutes les dépendances. La vidéo ne dure que 46 secondes, mais elle explique le processus de manière détaillée. Le processus est facile à réaliser, donc avec l'aide de cette vidéo, vous n'aurez aucun problème à suivre les étapes.
Comment envoyer un SMS depuis Perl (Instructions simples)
Pour envoyer un SMS depuis Perl :
- Installez un utilisateur HTTP API
- Activez "Log communication events" dans l'onglet Advanced
- Téléchargez puis extrayez le fichier SendSms.pl.zip
- Ouvrez le fichier sendsms.pl dans un éditeur de texte
- Lancez l'application Ozeki SMS Gateway
- Exécutez le code Perl SendSms.pl dans l'invite de commandes
- Vérifiez les logs pour voir si le SMS a été envoyé
Installez Ozeki SMS Gateway et créez un utilisateur HTTP API
Pour pouvoir envoyer un SMS depuis Perl, vous devez d'abord installer Ozeki SMS Gateway. La passerelle SMS peut être installée sur le même ordinateur où vous développez votre code Perl dans Windows Notepad ou Visual Studio Code. Après l'installation, l'étape suivante consiste à connecter Ozeki SMS Gateway au réseau mobile. Vous pouvez envoyer un SMS test depuis l'interface graphique d'Ozeki pour vérifier que votre connexion au réseau mobile fonctionne. La dernière étape pour préparer votre environnement est de créer un utilisateur HTTP SMS API. Créez un utilisateur avec le nom d'utilisateur "http_user" et le mot de passe "qwe123" pour que l'exemple fonctionne sans modification.
Une fois l'environnement configuré, vous pouvez exécuter votre code Perl.
URL de l'API HTTP pour envoyer un SMS depuis Perl
Pour envoyer un SMS depuis Perl, votre Perl devra effectuer une requête HTTP vers la passerelle SMS. L'URL de l'API est indiquée ci-dessous. Notez que l'adresse IP (127.0.0.1) doit être remplacée par l'adresse IP de votre passerelle SMS. Si Ozeki SMS Gateway est installé sur le même ordinateur où l'application Perl SMS est exécutée, cela peut être 127.0.0.1. S'il est installé sur un autre ordinateur, cela doit être l'adresse IP de cet ordinateur.
http://127.0.0.1:9509/api?action=rest
Authentification HTTP pour envoyer un SMS depuis Perl
Pour authentifier le client Perl SMS, vous devez envoyer le nom d'utilisateur et le mot de passe dans une chaîne encodée en base64 au serveur dans une requête HTTP. Le format utilisé est : base64(nom d'utilisateur+":"+mot de passe). En Perl, vous pouvez utiliser le code suivant pour effectuer cet encodage :
my ($self, $Username, $Password) = @_;
my $Username_Password = "${Username}:${Password}";
my $Username_Password_encoded = encode_base64($Username_Password);
return "Basic ${Username_Password_encoded}";
Par exemple, si vous encodez le nom d'utilisateur 'http_user' et le mot de passe 'qwe123', vous obtiendrez la chaîne encodée en base64 suivante : aHR0cF91c2VyOnF3ZTEyMw==. Pour envoyer
En-tête de requête HTTP pour envoyer un SMS depuis Perl
Pour envoyer les messages SMS, vous devez inclure les lignes suivantes comme en-têtes dans la requête HTTP. Notez que nous incluons un type de contenu et un en-tête d'autorisation.
Content-Type: application/json Authorization: Basic QWxhZGRpbjpvcGVuIHNlc2FtZQ==
Requête HTTP pour envoyer un SMS depuis Perl
Pour soumettre le SMS, votre application Perl enverra une requête HTTP similaire à celle ci-dessous. Notez que cette requête contient une partie d'en-tête HTTP et une partie de corps HTTP. Le corps HTTP est une chaîne de données encodée en JSON. Il contient le numéro du destinataire et le texte du message.
POST /api?action=sendmsg HTTP/1.1
Connection: TE, close
Content-Length: 341
Content-Type: application/json; charset=utf8
Authorization: Basic aHR0cF91c2VyOnF3ZTEyMw==
Host: 127.0.0.1:9509
Te: deflate,gzip;q=0.3
User-Agent: libwww-perl/6.52
{
"messages": [
{
"message_id": "fa32293f-db00-11eb-804d-ffacbeab4160",
"to_address": "+36201111111",
"text": "Hello world!",
"create_date": "2021-07-02T06:44:40",
"valid_until": "2021-07-09T06:44:40",
"time_to_send": "2021-07-02T06:44:40",
"submit_report_requested": true,
"delivery_report_requested": true,
"view_report_requested": true,
"tags": []
}
]
}
Réponse HTTP reçue par l'exemple Perl SMS
Une fois que la passerelle SMS reçoit cette requête, elle générera une réponse HTTP. La réponse HTTP contiendra un code d'état pour indiquer si la soumission du SMS a réussi ou non. Elle renverra également une structure encodée en JSON pour vous fournir des détails utiles sur la soumission du message.
HTTP/1.1 200 OK
User-Agent: OZEKI 10.3.123 (www.myozeki.com)
Content-Type: application/json; charset=utf8
Last-Modified: Tue, 29 Jun 2021 11:48:38 GMT
Server: 10/10.3.123
Transfer-Encoding: chunked
{
"http_code": 200,
"response_code": "SUCCESS",
"response_msg": "Messages queued for delivery.",
"data": {
"total_count": 1,
"success_count": 1,
"failed_count": 0,
"messages": [
{
"message_id": "fa32293f-db00-11eb-804d-ffacbeab4160",
"from_station": "%",
"to_address": "+36201111111",
"to_station": "%",
"text": "Hello world!",
"create_date": "2021-07-02 06:44:40",
"valid_until": "2021-07-09 06:44:40",
"time_to_send": "2021-07-02 06:44:40",
"submit_report_requested": true,
"delivery_report_requested": true,
"view_report_requested": false,
"tags": [
{
"name": "Type",
"value": "SMS:TEXT"
}
],
"status": "SUCCESS"
}
]
}
}
Connectez votre passerelle SMS au réseau mobile et créez un compte utilisateur HTTP API
Nous supposons que vous avez déjà installé Ozeki SMS Gateway, et que vous avez connecté la passerelle au réseau mobile. Pour pouvoir envoyer un SMS vers un téléphone mobile depuis Perl, vous devez configurer un compte utilisateur HTTP API dans Ozeki SMS Gateway. Dans cette vidéo, nous allons vous expliquer le processus de création d'un nouveau compte utilisateur HTTP API. La vidéo commence par l'ouverture de l'application Ozeki SMS Gateway et vous amène à la création de l'utilisateur HTTP API. Dans le processus, vous apprendrez comment configurer un nouvel utilisateur et comment activer l'option de journalisation. La vidéo ne dure que 30 secondes et explique le processus de manière très détaillée. Vous n'aurez aucun problème à comprendre les étapes.
Comment envoyer un SMS depuis Perl en utilisant l'API SMS Perl (Tutoriel vidéo)
Cette vidéo vous montre comment télécharger le fichier SendSms.pl.zip depuis cette page, et comment ouvrir le fichier SendSms.pl dans Notepad. Si vous regardez la vidéo, vous remarquerez que le contenu du fichier SendSms.pl zip est placé sur le bureau Windows. Vous verrez également que nous ouvrons le fichier SendSms.pl avec Windows Notepad.
Exemple Perl SMS : SendSms.pl
Sur la Figure 1, vous pouvez voir le code source de l'exemple de projet. Si vous êtes familier avec le langage de programmation Perl, n'hésitez pas à modifier le code à votre convenance. Ce code enverra un SMS au numéro de téléphone stocké dans la variable toAddress, avec le texte stocké dans la variable Text.
Comment vérifier que le SMS a été accepté par l'utilisateur HTTP
Après la soumission du SMS, il est conseillé de vérifier votre passerelle SMS, pour voir ce qu'elle a reçu. Vous pouvez vérifier le journal en ouvrant les détails de l'utilisateur HTTP depuis la console de gestion d'Ozeki SMS Gateway. La vidéo suivante vous montre ce qu'il faut rechercher.
Comment vérifier que le SMS a été envoyé vers le réseau mobile
La dernière étape pour vérifier la procédure consiste à consulter les journaux de la connexion au réseau mobile. Vous devrez peut-être activer la journalisation dans la configuration de la connexion avant d'envoyer le message pour voir les journaux. Si la journalisation est activée, vous verrez le numéro de téléphone et le texte du message que vous avez envoyé.
À quoi ressemble la réception d'un SMS sur un téléphone Android (Tutoriel vidéo)
Dans cette vidéo, vous verrez à quoi ressemble la réception d'un SMS sur un appareil Android. Elle commence par une page d'accueil Android ordinaire. Vous verrez la notification apparaître, puis l'application Messages ouverte avec le SMS visible. La vidéo ne dure que 18 secondes, mais elle présente l'intégralité du processus.
Conclusion
Ce guide avait pour but de montrer comment envoyer un SMS en Perl avec l'aide d'Ozeki SMS Gateway. Si tout a été lu attentivement, la messagerie avec vos clients en Perl avec Ozeki SMS Gateway ne devrait poser aucun problème. Il faut souligner qu'Ozeki SMS Gateway vous permet de journaliser les SMS dans une base de données et offre diverses capacités de reporting pour fournir plus d'informations sur la connexion SMS.
Continuez à lire sur la page de tutoriels d'Ozeki où vous trouverez plus d'informations sur des sujets comme la planification de SMS en Perl.
La seule chose à faire maintenant est de télécharger Ozeki SMS Gateway et de commencer à travailler !
More information
- Envoyer un SMS en Perl avec l'API REST HTTP (exemple de code)
- Envoyer plusieurs SMS en Perl avec l'API REST HTTP (exemple de code)
- Planifier un SMS en Perl avec l'API REST HTTP (exemple de code)
- Recevoir un SMS en Perl avec l'API REST HTTP (exemple de code)
- Supprimer un SMS en Perl avec l'API REST HTTP (exemple de code)
- Comment télécharger la dernière bibliothèque SMS Perl depuis Github