Section courante

A propos

Section administrative du site

Mail::Sendmail

 Courriel: Envoi de courriel
Perl
  

Description

Ce module est une bibliothèque permettant d'envoyer des courriels indépendamment de la plateforme.

Liste des fonctions

Voici la liste des fonctions disponibles dans ce module :

Nom Prototype Description
SENDMAIL sub sendmail(%mail) Cette fonction permet d'envoyer un courriel.
TIME_TO_DATE sub time_to_date() Cette fonction permet de convertir l'heure en une chaine de caractères de format «RFC 822».

Liste des variables

Voici la liste des variables disponibles dans ce module :

Nom Variable Description
ADDRESS_RX address_rx Cette variable contient l'expression régulière du format d'adresse de courriel reconnu par le module.
ERROR error Cette variable contient le message d'erreur de la dernière opération d'envoi de courriel.
LOG log Cette variable contient un résultat d'opération à écrire dans un journal de bord comme un fichier de log par exemple.
MAILCFG mailcfg Cette variable contient un tableau associatif de champs pour la configuration d'un serveur SMTP.
mailcfg{'debug'} Ce champs de variable permet d'indiquer l'état du mode de déboguage.
mailcfg{'delay'} Ce champs de variable permet d'indiquer le délai d'attente en seconde avant que le serveur doit retenter l'envoi en cas d'échec.
mailcfg{'from'} Ce champs de variable permet d'indiquer l'adresse de l'envoyeur de courriel.
mailcfg{'mime'} Ce champs de variable permet d'indiquer le format MIME du courriel.
mailcfg{'port'} Ce champs de variable permet d'indiquer le port du serveur SMTP. La valeur par défaut est 25.
mailcfg{'retries'} Ce champs de variable permet d'indiquer le nombre de tentative que le serveur doit retenter l'envoi en cas d'échec.
mailcfg{'smtp'} Ce champs de variable permet d'indiquer l'adresse du serveur SMTP.
mailcfg{'tz'} Ce champs de variable permet d'indiquer le fuseau horaire du courriel.

Exemple

Le programme suivant permet d'envoyer un courriel au destinataire «toi@gladir.com» à partir du courriel «moi@gladir.com» :

  1. #!/usr/bin/perl
  2.  
  3. use Mail::Sendmail;
  4.  
  5. %mail = (
  6.    'to'      => 'moi@gladir.com',
  7.    'from'    => 'toi@gladir.com',
  8.    'Message' => "Ceci est le corps du message"
  9. );
  10.  
  11. sendmail(%mail) || die $Mail::Sendmail::error;
  12.  
  13. print "Réussi. Le journal de bord indique:\n", $Mail::Sendmail::log;

Dernière mise à jour : Dimanche, le 18 octobre 2015