Bonjour,
Je voudrais savoir comment faire pour envoyer un mail en mode console. Je précise que je n’utilise pas de server mail.
Merci.
Bonjour,
Je voudrais savoir comment faire pour envoyer un mail en mode console. Je précise que je n’utilise pas de server mail.
Merci.
[/code]use Net::SMTP;
$serveur = "smtp.tonfai.fr";
$smtp = Net::SMTP->new($serveur,
Hello => 'chezmoi.fr');
$smtp->mail("moienlocal\@chezmoi.fr");
$smtp->to($ARGV[0]);
$smtp->data();
$smtp->datasend("Subject: message de console\n");
$smtp->datasend ("\n");
open(FIC,$ARGV[1]);
while($ligne=<FIC>) {
print $ligne ;
$smtp->datasend ($ligne)
}
$smtp->dataend();
$smtp->quit;
close($ARGV[1]);
Si tout va bien, ce truc employé comme
./nom.pl alfred@laposte.net message
envoies le fichier message à alfred. Mais il vaut mieux installé exim et utilisez mail, c’est + simple.