Select Code to Download

Message-ID: <1039751337.22128@idhost> 
Content-Transfer-Encoding: 8bit 
...
To: <!-- TMPL_VAR NAME=FNAME --> <!-- TMPL_VAR NAME=LNAME --> <<!-- TM
+PL_VAR NAME=EMAIL -->> 
Subject: <!-- TMPL_VAR NAME=SUBJECT --> 
Precedence: bulk

while(my %recipient_info = get_info_from_db()) {
    my $template = HTML::Template->new(filename => 'email.tmpl');
    $template->param(%recipient_info);
    print $template->output();
}