This can be eaily accomplished using the filter option to HTML::Template->new(). For example, in your template:

  <tmpl_include magic>
[download]

Then in your code:

   my $filename = "magic_include.tmpl";
   my $filter = sub {$$_[0] =~ s/<tmpl_include magic>/<tmpl_include $f
+ilename>/};
   my $t = HTML::Template->new(filename => "magic.tmpl",
                               filter   => $filter);
[download]

By replacing the special <tmpl_include> with a real one using a generate template name you will achieve a dynamic template include.

I really should put this in the FAQ!

-sam