Envoi mail via telnet

Bonjour,

J'ai créé un script "envoi_mail" en bash permettant d'envoyer des emails via telnet :

#!/bin/bash

echo HELO $1
sleep 1
echo MAIL FROM: $2
sleep 1
echo RCPT TO: $3
sleep 1
echo DATA
echo SUBJECT: Probleme disque sur $4
echo "Probleme sur le disque..."
echo .
echo QUIT

que j'appelle depuis un autre script avec la commande :

/usr/local/scripts/envoi_mail $HOSTNAME "root@$HOSTNAME.machin.com" "truc@machin.com" $HOSTNAME | telnet smtp.machin.com 25

Je dois modifier ce(s) script(s) pour utiliser perl plutôt que bash.

Quelle est la syntaxe à utiliser ?

Merci !

Bonjour,

Renseigne toi sur le module Net::Telnet que tu poura trouver sur le CPAN. Il te suffit de créer ton objet avec new en précisant bien le numéro de port (25) car sinon tu te connexteras avec le port par défaut (13) qui n'est pas le bon. Ensuite, tu pourras envoyer tes commandes avec la méthode print il me semble.

Citation:

---

Envoyé par Woufeil

Bonjour,

Renseigne toi sur le module Net::Telnet que tu poura trouver sur le CPAN. Il te suffit de créer ton objet avec new en précisant bien le numéro de port (25) car sinon tu te connexteras avec le port par défaut (13) qui n'est pas le bon. Ensuite, tu pourras envoyer tes commandes avec la méthode print il me semble.

---

Merci beaucoup, ça fonctionne :P