[Résolu] Envoyer mail en perl avec authentification

Envoyer mail en perl avec authentification [Résolu] - Perl - Programmation

Marsh Posté le 19-10-2007 à 12:49:35    

Bonjour à tous,
 
J'ai un petit problème qui est constamment resté sans solution sur le net.
L'exploit est donc possible! :bounce:  
Tous à vos neurons! :D  
 
Voilà mon code  

Code :
  1. #!/usr/bin/perl
  2. use warnings;use strict;
  3. use MIME::Lite;
  4. my $log="d.b";
  5. my $pass="123456";
  6. my $sujet = "testage";
  7. my $texte = "Tain comme ça marche bien salette!\nZorro";
  8.  
  9. MIME::Lite->send('smtp','smtp.laposte.net',
  10.          AuthUser=>$log, AuthPass=>$pass);
  11. my $msg = MIME::Lite->new(
  12.       From    => 'd.b@laposte.net',
  13.   To      => 'r.t@laposte.net',
  14.   Subject =>  $sujet,
  15.   Type    =>  'TEXT',
  16.   Data    => "$texte" );
  17. $msg->send();
  18.   print "***** MESSAGE $sujet ENVOYE *****\n";


 
Et l'erreur sortie dans le terminal :  
SMTP Failed to connect to mail server: Invalid argument
 at mailer.pl line 19
 
La line 19 étant $msg->send();
 
Merci pour votre aide précieuse, c'est un gros blocage pour moi...


Message édité par ledzep2 le 24-10-2007 à 17:39:52
Reply

Marsh Posté le 19-10-2007 à 12:49:35   

Reply

Marsh Posté le 19-10-2007 à 17:36:11    

Euh...nan? toujours pas?

Reply

Marsh Posté le 22-10-2007 à 16:06:04    

Si c'est avec un autre langage de programmation, c'est pas grave hein!

Reply

Marsh Posté le 23-10-2007 à 15:13:46    

Nan mais sérieux y a pas d'autres moyens?

Reply

Marsh Posté le 23-10-2007 à 15:31:34    

chez moi ça marche [:spamafote] que veux tu que je rajoute...
T'es sur que le smtp de laposte authorise la connexion de ton serveur?
T'es sur de ton login/pass?

Reply

Marsh Posté le 23-10-2007 à 15:33:03    

Ah ca ca me rassure tiens!
C'est sympa d'avoir testé!!
Merci beaucoup!
T'as essayé avec quel mail?

Reply

Marsh Posté le 23-10-2007 à 15:43:07    

ledzep2 a écrit :

Ah ca ca me rassure tiens!
C'est sympa d'avoir testé!!
Merci beaucoup!
T'as essayé avec quel mail?


quel smtp tu veux dire?
Un smtp qui tourne sur un de nos serveurs :o

Reply

Marsh Posté le 23-10-2007 à 16:19:17    

Je pense que mes connaissances sont trop limitées pour comprendre ce que tu me dis.
Tu penses toi que laposte n'accepte pas ce genre de connexion ? (tiens d'ailleurs comment ça s'appelle)
Je dois pouvoir essayer avec Free.
Sinon il ne me reste plus qu'à monter un smtp en local?
Quel moyen utiliser?
Ce que je me dis c'est que j'essaye de faire comme un spammeur en fait, non?
Et donc je ne vais jamais m'en sortir...

Reply

Marsh Posté le 23-10-2007 à 16:52:21    

ledzep2 a écrit :

Je pense que mes connaissances sont trop limitées pour comprendre ce que tu me dis.


Pour le smtp t'as plus qu'à lire la rfc821 :o
Plaisanterie mise à part, wikipedia fournit une bonne explication ( et des méthodes pour tester la connexion).

ledzep2 a écrit :

Tu penses toi que laposte n'accepte pas ce genre de connexion ?


J'en sais strictement rien :o  

ledzep2 a écrit :


Sinon il ne me reste plus qu'à monter un smtp en local?
Quel moyen utiliser?


Un smtp local c'est "a moitié" simple à installer.
Ton perl est executé sur quel OS? ( si tu me réponds windows, je ne te serais d'aucun secours)

ledzep2 a écrit :


Ce que je me dis c'est que j'essaye de faire comme un spammeur en fait, non?


tout à fait  :jap:  

Reply

Marsh Posté le 24-10-2007 à 15:02:56    

Me revoilà!
Bon je pense que laposte faut que je laisse tomber.
Je vais en essayer d'autres.
Sinon pour l'installation du smtp en local j'ai un PowerMacQuad...MAC OS X, avec les majuscules qui vont bien cousin!
Donc voilà...je te tiens au courant.

Reply

Marsh Posté le 24-10-2007 à 15:02:56   

Reply

Marsh Posté le 24-10-2007 à 16:56:04    


 

anapajari a écrit :


J'en sais strictement rien :o  


 
Y a déjà ça :
SMTP auth() command not supported on smtp.free.fr
 
Au moins eux ils le disent!! :fou:  :kaola:

Reply

Marsh Posté le 24-10-2007 à 17:39:26    

Bon la soluce, c'est d'utiliser FREE.
Et le tout sans authentification!
Je vois que ça.
 

Code :
  1. # my $sujet = "testage";
  2. # my $texte = "Tain comme ça marche bien salette!\nZorro";
  3. # MIME::Lite->send('smtp','smtp.free.fr');
  4. # my $msg = MIME::Lite->new(
  5. #       From    => 'd.b@laposte.net',
  6. #   To      => 'r.t@hotmail.com',
  7. #   Subject =>  $sujet,
  8. #   Type    =>  'TEXT',
  9. #   Data    => "$texte" );
  10. # $msg->send();
  11. #   print "***** MESSAGE $sujet ENVOYE *****\n";


 
Eh beh ça ça marche... :p


Message édité par ledzep2 le 24-10-2007 à 18:01:58
Reply

Marsh Posté le 24-10-2007 à 17:59:53    

c'est moi ou tu utilises laposte dans le code que tu nous montres?

Reply

Marsh Posté le 24-10-2007 à 18:02:14    

Ca y est j'ai édité!

Reply

Marsh Posté le 01-07-2011 à 23:06:16    

Là je le teste depuis chez moi sur un windows en activeperl eh beh ça marche plus !
 
SMTP Failed to connect to mail server: Unknown error at  
 
c'est à la ligne
$msg->send();
 
La je vois pas.
Le Unknown error ça aide pas beaucoup.
J'ai essayé en coupant le firewall, et rien...
Rien qui change.
Une idée ?

Reply

Marsh Posté le 01-07-2011 à 23:06:51    

Là je le teste depuis chez moi sur un windows en activeperl eh beh ça marche plus !
 
SMTP Failed to connect to mail server: Unknown error at  
 
c'est à la ligne
$msg->send();
 
La je vois pas.
Le Unknown error ça aide pas beaucoup.
J'ai essayé en coupant le firewall, et rien...
Rien qui change.
Une idée ?

Reply

Marsh Posté le 27-09-2011 à 02:45:57    

Salut,
Change de smtp
Prend par exemple smtp.numericable.com
 
++

Reply

Sujets relatifs:

Leave a Replay

Make sure you enter the(*)required information where indicate.HTML code is not allowed