# In perl script
my @articles = MPDatabase::Article->retrieve_all;
$template->param(article_loop => \@articles);
return $template->output;

# In the template file
<!-- TMPL_LOOP NAME="article_loop" -->
<!-- TMPL_VAR NAME="this.title" -->
<!-- TMPL_VAR NAME="this.author" -->
etc...
<!-- /TMPL_LOOP -->