Hébergeur de fichiers indépendant

smtp.txt

À propos

Type de fichier
Fichier TXT de < 1 Ko (text/x-perl)
Confidentialité
Fichier public, envoyé le 15 juin 2017 à 14:48, depuis l'adresse IP 165.225.x.x (France)
Sécurité
Ne contient aucun Virus ou Malware connus - Dernière vérification: 14 heures
Statistiques
La présente page de téléchargement a été vue 250 fois depuis l'envoi du fichier
Page de téléchargement

Aperçu du fichier


#!usr/bin/perl -w

use strict;
use Net::SMTP;

#Étape 1
my $smtp = Net::SMTP->new('smtp.orange.fr') or die 'Impossible de se connecter au serveur : ' . $!;

#Étape 2
$smtp->mail('tflucie@wanadoo.fr') or die 'Un problème est survenu avec la méthode mail() !';

#Étape 3
$smtp->to('tflucie@gmail.com') or die 'Un problème est survenu avec la méthode to() !';

#$smtp->cc('*****@hotmail.fr') or die 'Un problème est survenu avec la méthode cc() !';
#$smtp->bcc('*****@hotmail.fr') or die 'Un problème est survenu avec la méthode bcc() !';

#Étape 4
$smtp->data() or die 'Un problème est survenu avec la méthode data() !';
$smtp->datasend('J\'apprends à envoyer des mails en Perl !') or die 'Un problème est survenu avec la méthode datasend() !';
$smtp->dataend() or die 'Un problème est survenu avec la méthode dataend() !';

#Étape 5
$smtp->quit() or die 'Un problème est survenu avec la méthode quit() !';



Partager le fichier

Télécharger smtp.txt

Télécharger le fichier (< 1 Ko)