Hi Kevin,

I use this simple PERL code that (for me) works nicely.

$from, $to, $reply, $subject, $body are the variables you have to feed.
The way of filling "Reply-to, Return-Path, From" lines, depends on your 
needs, this is only an example.


             open (MESSAGE, "| /usr/sbin/sendmail -t");

             print MESSAGE "Return-Path: $from\n";
             print MESSAGE "From: <$from>\n";
             print MESSAGE "To: $to\n";
             print MESSAGE "Reply-To: $reply\n";
             print MESSAGE "Subject: $subject\n";

             print MESSAGE "\n$body\n";

             close (MESSAGE);

Ciao,

Tonino

At 10/05/2001 10/05/2001 +0100, Kevin Smith wrote:
>Hi All,
>
>I want to send mail using Perl, however, I want to use qmail to send it and
>for qmail to report any failed emails, i.e. bad email addresses, failed
>deliveries, etc.
>
>Would qmail-inject do this for me and if so, does anyone have any simple
>examples using this with Perl?
>
>Many thanks,
>
>Kevin Smith

Reply via email to