Loop:
hänge
$obj->tpl_param(
  'TPL_MyTag',
  'MyName',
  {
    'var_1' => $cont_1,
    'var_2' => $cont_2,
    'var_n' => $cont_n,
  }
);
in einen for/foreach/while - Block
und Du hast den Loop.

IF oder ELSE/ELSIF oder UNLESS:
hänge
$obj->tpl_param(
  'TPL_MyTag',
  'MyName',
  {
    'var_1' => $cont_1,
    'var_2' => $cont_2,
    'var_n' => $cont_n,
  }
);
in einen if/else/elsif/unless - Block
und Du hast die Condition

Ich arbeite liebend gern mit Here-Dokumenten ...
hier ;) jedoch ging es mir darum den HTML-Bereich auf möglichst 'speicherschonende' Art vom Perl-Code zu trennen.

Aber ich hatte doch auch nur um eine Code-Durchsicht gebeten und dabei ganz sicherlich nicht erwartet dass nun alle Leute mit fliegenden Fahnen auf eben dieses Modul überwechseln :)