See inline.
------------------------------------------------
On Wed, 04 Dec 2002 08:04:37 -0500, zentara <[EMAIL PROTECTED]> wrote:
> On 04 Dec 2002 11:48:54 +0200, [EMAIL PROTECTED] (Stelian Iancu)
> wrote:
>
> >Hello!
> >
> >I have this cgi script and I want to send mail to the users using the
> >local installed sendmail. Can you please explain how to do it? Or please
> >point me to a doc that explains this?
>
> There are alot of nice modules to do this, but this does it
> just with sendmail.
>
> #!/usr/bin/perl -w
> use strict;
>
> my $mailprog='/usr/sbin/sendmail';
> my $email = '[EMAIL PROTECTED]';
> my $from = '[EMAIL PROTECTED]';
>
> open( MAIL, "|$mailprog -t" )
> || safe_die("Can't start mail program $mailprog $!");
> print MAIL "To: $email\n";
> print MAIL "From: $email\n";
Probably want :-) :
print MAIL "From: $from\n";
> print MAIL "Subject: sitenews: Notification\n";
> print MAIL "\n\n"; #important to print this
> print MAIL "Backup completed for website.\n\n";
> print MAIL "-" x 75 . "\n";
>
> close(MAIL);
>
>
>
> --
> To unsubscribe, e-mail: [EMAIL PROTECTED]
> For additional commands, e-mail: [EMAIL PROTECTED]
>
--
To unsubscribe, e-mail: [EMAIL PROTECTED]
For additional commands, e-mail: [EMAIL PROTECTED]
