Bonjour,

Nous essayons désesperement de trouver une solution pour envoyer des pièces jointes avec Sendmail (SunOS) par le biais du Shell ou du Perl.

Lorsque l'on ne redéfinit pas le From: , c'est possible avec uuencode.
Cependant, lorsque l'on redéfinit ce From: ce n'est plus possible (nous sommes obligés, pour des raisons de sécurité, de redéfinir le From: de SendMail)

Nous utilisons un module perl suivant :

#!/usr/bin/perl

use strict;

my $from = "toto\@entreprise.fr";
my $sendmail = "/usr/lib/sendmail -t -f $from";
open(MAIL, "| $sendmail") or die "Can't open $sendmail: $!\n";
print MAIL "From: <$from>\n";
print MAIL "Reply-to: $from\n";
print MAIL "To: $ENV{TO_MESSAGE}\n";
print MAIL "Cc: $ENV{COPY_MESSAGE}\n";
print MAIL "Subject: $ENV{SUJET_MESSAGE}\n";
print MAIL "\n";
print MAIL "$ENV{MESSAGE}.";
close(MAIL);

exit;

Les variables d'environnement sont définis dans le Shell appelant


Auriez vous une idée s'il vous plait ?

Merci

> Lire le message (1 commentaire, moyenne: 2).