Bonjour,
Est-ce que quelqu'un pourrait m'indiquer ce qui ne va pas ?
J'ai écrit le code suivant :
J'obtiens le message suivant :
Code : Sélectionner tout - Visualiser dans une fenêtre à part
1
2
3
4
5
6
7
8
9
10
11
12
13
14 #!usr/bin/perl -w use strict; use Net::SMTP; my $smtp = Net::SMTP->new('smtp.mail.yahoo.fr') or die "Connexion SMTP impossible\n : $!"; $smtp->mail('prenom.nom@yahoo.fr'); $smtp->to('prenom.nom.@yahoo.fr'); $smtp->data(); $smtp->datasend("To: Destinataires\n"); $smtp->datasend("Subject: Objet du mail\n"); $smtp->datasend("Première ligne de texte à envoyer.\n"); $smtp->datasend("Deuxième ligne de texte à envoyer.\n"); $smtp->dataend(); $smtp->quit;
MerciConnexion SMTP impossible : Unknown error at mail.pl line 5.
Partager