[Perl]Mail avec un login et mot de passe
Fermé
princessedesiles
-
11 oct. 2007 à 07:21
lami20j Messages postés 21331 Date d'inscription jeudi 4 novembre 2004 Statut Modérateur, Contributeur sécurité Dernière intervention 30 octobre 2019 - 11 oct. 2007 à 13:36
lami20j Messages postés 21331 Date d'inscription jeudi 4 novembre 2004 Statut Modérateur, Contributeur sécurité Dernière intervention 30 octobre 2019 - 11 oct. 2007 à 13:36
A voir également:
- [Perl]Mail avec un login et mot de passe
- Mot de passe administrateur freebox ✓ - Forum Freebox
- Ce programme est écrit en python. il construit un mot secret dans une variable mais il ne l'affiche pas. modifiez-le pour qu'il affiche le mot secret. exécutez-le. quel est ce mot secret ? ✓ - Forum Python
- Piratage facebook changer mot de passe - Guide
- Dans le texte, un seul mot a réellement été écrit en lettres capitales (majuscules). quel est ce mot ? ✓ - Forum Word
- Supprimer mot de passe windows 10 - Guide
1 réponse
lami20j
Messages postés
21331
Date d'inscription
jeudi 4 novembre 2004
Statut
Modérateur, Contributeur sécurité
Dernière intervention
30 octobre 2019
3 566
11 oct. 2007 à 13:36
11 oct. 2007 à 13:36
Salut,
je n'ai pas testé
je n'ai pas testé
#!/usr/bin/perl
use warnings;use strict;
use MIME::Lite;
my $sujet = "test yahoo mail";
my $texte = "Message de test avec smtp yahoo avec password";
MIME::Lite->send('smtp','smtpyahoo',
AuthUser=>"user", AuthPass=>'password');
my $msg = new MIME::Lite
From => 'lami20j@yahoo.fr',
To => 'lami20j@domaine.fr',
Subject => $sujet,
Type => 'TEXT',
Data => "$texte";
$msg->send();
print "***** MESSAGE $sujet ENVOYE *****\n";
__END__Voir aussi Net::SMTP