Discussion :

[Premium]

Bonjour,

Est-ce que quelqu'un pourrait m'indiquer ce qui ne va pas ?
J'ai écrit le code 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;

J'obtiens le message suivant :

Connexion SMTP impossible : Unknown error at mail.pl line 5.

Merci

[iblis]

Je vois deux raisons à l'échec de ton script :

1. chez yahoo l'accès au serveur smtp est réservé au client d'un compte premium (c'est à dire payant)
2. le serveur smtp yahoo requiert l'authentification, tu dois donc utiliser Net::SMTP::SSL (sur port 465, je pense mais à vérifier)

Bref, tu ne peux t'orienter vers 2 que si tu as déjà 1.

[astrotouf]

et bien non l'accés n'est pas réservé aux clients premium. il est gratuit.
j'utilise Thunderbird pour envoyer des mails tous les jours et je paye que dalle.
pour te connecter à yahoo il te faut une connexion SSL sur le port 465.
voila une page qui t'explique :
http://help.yahoo.com/help/fr/mail/pop/pop-03.html

[iblis]

Tu dois donc utiliser Net::SMTP::SSL (port 465), comme dit plus haut.