Envoi d'Email par Perl

[Fermé]
Signaler
-
Messages postés
21331
Date d'inscription
jeudi 4 novembre 2004
Statut
Modérateur, Contributeur sécurité
Dernière intervention
30 octobre 2019
-
Bonjour,
Je bute depuis qq heures sur un envoi de mail via le module Mime::Lite
En fait, j'ai fais des recherches sur le script à utiliser et qui semble bon mais j ai des messages d'erreur.
Peut-êtrte l'un de vous peut il m'aider, je suis totalement coincé.
Voici mon script :

#!/usr/local/bin/perl
use MIME::Lite;

my $msg = new MIME::Lite
From =>'moi@myhost.com',
To =>'a qqn@toto.com',
Cc =>'some@other.com, some@more.com',
Subject =>'mon message',
Type =>'le texte',
Data =>"Efficace non ?";
$msg -> send;

Le message d'erreur sur Windows XP que j'obtiens est : "'sendmail' n'est pas reconnu en tant que commande interne
ou externe, un programme exécutable ou un fichier de commandes.

Pourtant j'ai installé tous les packages se rapportant à sendmail.
J'ai essayé avec
$Message -> send('sendmail', 'C:/Perl/site/lib/Email/sendmail -t -oi -oem');

ou send('smtp', 'smtp.monfai.com') mais la il faut une authentification et je ne sais aps comment donner un login/passwd.

Voila,
J'espere que vous avez compris ce qui peut coincer. Merci de votre aide.

2 réponses

Messages postés
21331
Date d'inscription
jeudi 4 novembre 2004
Statut
Modérateur, Contributeur sécurité
Dernière intervention
30 octobre 2019
3 554
Salut,

ça pourra t'aider http://www.alianwebserver.com/informatique/languages/perl/mail.htm
http://www.devparadise.com/technoweb/code/perl/a324.php
http://bribes.org/perl/docfr/perlwin32faq4.html#L8222DB51
Merci pour les liens, j ai ete voir. Apparemment, il faut que j oublie le module mime::lite pour prendre autre chose.
Bon bah tant pis, heureusement qu il y a des alternatives.

Merci encore.
Messages postés
21331
Date d'inscription
jeudi 4 novembre 2004
Statut
Modérateur, Contributeur sécurité
Dernière intervention
30 octobre 2019
3 554
Re,

j'espère que tu as trouvé la solution pour ton problème.

Bon bah tant pis, heureusement qu il y a des alternatives.

Alors si tu ne connais pas le slogan de Perl : TMTOWTDI

There's More Than One Way To Do It.
Il y a plus d'une façon de le faire

Bonne continuation,

lami20j