I am using the Email::MIME:CreateHTML module to send html formatted
emails.  It all works fine until I try to change the "To" line to a
scalar so that I can mass mail to different individuals.  Has anyone
used this module in a manner like this before?  Thanks,

my $email = [EMAIL PROTECTED];

while(<DAT>)

{

        $line = TRIM($_);

        $html = $html . $_;

        if($line eq "</body>")

        {

my $email = Email::MIME->create_html(

        header => [

                From => '[EMAIL PROTECTED]',

                To => '$email',

                Subject => 'Some Subject',

        ],

        body => $html,

);

 

my $sender = Email::Send->new({mailer => 'SMTP'});

$sender->mailer_args([Host => 'tiger.georgetowncollege.edu']);

$sender->send($email);

                $html = "";

        }

}

close(DAT);

 

Travis Hervey

Programmer Analyst

Georgetown College

400 East College Street

Georgetown KY, 40324

Tel: 1-502-863-8001

Fax: 1-502-686-8884

Email: [EMAIL PROTECTED] 

 

Reply via email to