Bonjour,
J'ai un script PERL qui envoie les mails. Quand le champs 'to' est rempli de façon manuelle ($to="monemail\@toto.com"), l'email est correctement envoyé ; par contre, quand le champ 'to' est rempli grace à une fonction, l'email n'est pas correctement envoyé (probablement à cause de '@').
Je n'arrive pas à resoudre ce problème. Alors si quelqu'un peut m'aider, ce serait gentil.
P.S.:
Les mails sont stockés dans un fichier au format monemail@toto.com.
Je commence par ourvir mon fichier afin de récupérer chaque email
open(FICHIER, 'email.txt') || die ("Erreur d'ouverture du fichier des abonnés emailabonnes.txt");;
Pour chaque email récupéré, j'envoie le mail
1 2 3 4 5
| while($courrier = <FIC_ABONNES>)
{
$to = $courrier;
$resultat = &send($to);
} |
Avec ce code, le mail est envoyé de façon anormale (dans le corps meme de l'email, je vois le contenu de l'entete), alors que si je remplace par exemple la ligne
par
$to = "monemail\@toto.com";
le mail est envoyé de façon correcte (sans l'entete dans le corps meme du mail)
Partager