>
> >
> >if your file is a text file....
> >
> >#! /usr/bin/perl -w
> >
> >$file = "/suidbin/sendmail -t";
> >$var = "the_file.txt";
> >
> >open(FILE, "$var") || die "cant open text file";
> >@file = <FILE>;
> >close(FILE);
> >
> >##open pipe to sendmail
> >open(MAIL, "|$file") || die "cant open sendmail";
> >print MAIL "To: blah\@devnull.bz\n" ;
> >print MAIL "From: blah\@cyberspace.org\n" ;
> >print MAIL "Subject: Fresh\n\n" ;
> >foreach(@file){
> > print MAIL;
> >}
> >close ( MAIL ) ;
> >
> >
> >--
> >jd
> >[EMAIL PROTECTED]
> >
> >Bad spellers of the world untie!
>
>
> The above file works great on my NT server.... but how do I
> send it to multiple people? I've tried turning the addressee
You'll need to specify a properly formatted list of adresses.
You can do that by researching the proper format on the internet and doing by hand or
use one of the
Great mail modules to do it for you, faster, neater, easier, more portabley, safer,
error free ( asuming the addresses are real of course and formatted right but there's
even a module for that! )
Dan
> string into an array, in multiple ways. An example is the following:
>
> @addressee=("joe_employee\@my.com","jane_employee\@your.com");
> foreach $i (@addressee) {
> open(MAIL, "|$file $addressee") || die "can't open sendmail";
> print MAIL "To: $addressee\n" ;
> print MAIL "From: tom_employee\n" ;
> print MAIL "Subject: Email Message\n\n" ;
>
>
> AND THEN I've put the closing brackets in multiple places...
> but I get the error that NO RECIPIENT is specified. Sent to
> dead letter file.
>
> It works if I only specify one addressee.
>
> Help, again???
>
> --Deborah
>
>
>
> --
> 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]
