> From: Justin Simoni <[EMAIL PROTECTED]>
> Date: Fri, 14 Apr 2000 13:47:05 -0500 (EST)
>
> > not a qmail question, but if I understand what your
> > trying to do correctly, then isn't this what you want to do? :you
> >
> > open (LIST,"/home/justin/www/cgi-bin/lovely_people.list");
> > foreach (<LIST>) {
> > #send mail to "$_"
> > }
>
> thats how its doing it now ;) but i'd rather have qmail or sendmail handle
> that for me,
> 1)it's probably more efficient for qmail to do the dirty work
> 2)this list has about 1000 people, and it takes more than a couple minutes
> for perl to go through that all,making my program look like its hanging
> ;(
Short of installing exmlm-idx as was mentioned, why not just include all the
users on the command line something like this:
open (LIST,"/home/justin/www/cgi-bin/lovely_people.list") or
die "Couldn't open LIST: $!";
open (MAIL, "|/var/qmail/bin/qmailinject " . join(' ', <LIST>) or
die "Couldn't open pipe to qmailinject: $!";
print MAIL $mailmessage;
close(MAIL) or die "Couldn't close pipe to qmailinject: $!";
close(LIST);
[ Not tested, of course...you may need to chomp the lines from the file or
something... ]
Chris
--
Chris Garrigues virCIO
http://www.DeepEddy.Com/~cwg/ http://www.virCIO.Com
+1 512 432 4046 +1 512 374 0500
4314 Avenue C
O- Austin, TX 78751-3709
My email address is an experiment in SPAM elimination. For an
explanation of what we're doing, see http://www.DeepEddy.Com/tms.html
Nobody ever got fired for buying Microsoft,
but they could get fired for relying on Microsoft.
PGP signature
