Subject: Pour les administrateurs de serveurs de listes utilisant le logiciel Sympa
List archive
- From: "brix" <address@concealed>
- To: <address@concealed>
- Subject: Re: envoyer un msg a la main ?
- Date: Fri, 24 Nov 2000 17:39:03 +0100
Le vendredi 24 novembre 2000 a 15:19, antwan a ecrit :
> y'a-t-il un moyen d'envoyer un message a la main ? c'est a dire grace a
> une commande unix directement sur le server ? si oui comment ? et si non
> quelle serait la marche a suivre pour y arriver ( fction perl de sympa
> a recuperer, spool ou injecter le message...etc..) ??
Si vous avez sendmail sur la machine -
Dans un script Perl :
sub mailer{
my ($from,$to,$sujet,$message) = @_;
$MAILLEUR = "/usr/lib/sendmail";
open (MAIL, "|$MAILLEUR -t $to") || die ("Erreur du pipe a l ouverture du
mailleur $MAILEUR");
print MAIL ("From: ",$from,"\n","To: ",$to,"\n","Subject:
",$sujet,"\n\n","$message");
close (MAIL);
}
Regarder dans la FAQ Perl :
perldoc -q "send mail"
Ou encore :
address@concealed (Alain BARBET) ecrivait dans
<address@concealed> :
>Bonjour,
>
>> J'aimerai savoir comment envoyer un email sans passer par sendmail
>> mais en passant par SMTP ?
>
>Par MIME::Lite, le comportement par défaut c'est $mail->send; et il va
>utiliser sendmail.
>Sinon un passage de la doc d'Eryq dit:
>
>Change how messages are sent
> ### Do something like this in your 'main':
> if ($I_DONT_HAVE_SENDMAIL) {
> MIME::Lite->send('smtp', "smtp.myisp.net", Timeout=>60);
> }
>
> ### Now this will do the right thing:
> $msg->send; ### will now use Net::SMTP as shown above
>
>HTH,
>--
>Alain BARBET
>http://www.alianwebserver.com/informatique/languages/perl/mail.htm
>
-
envoyer un msg a la main ?,
antwan, 11/24/2000
- Re: envoyer un msg a la main ?, brix, 11/24/2000
-
Re: envoyer un msg a la main ?,
antoine, 11/24/2000
- Re: envoyer un msg a la main ?, Aumont, 11/27/2000
Archive powered by MHonArc 2.6.19+.