Your example doesn't indicate use of any templating system. Templates are used if the signal to noise ratio (read: perl to "not perl stuff") is pretty low, i.e. you have lots of non-perl stuff controlled by some perl statements (conditionals and maybe flow control), where the template gives the static structure and perl delivers the content that matters into that structure.

Templating is always about embedding results of perl expressions into "foreign" content. Since there's not much "foreign" stuff in your example, any pointers to templating solutions based on your question are wild shots in the dark with a preferred target in mind.