Select Code to Download

#furiously waving hand!
my %fields = get_fields(); # field name => old value
...
my $tmpl = HTML::Template->new();
$tmpl->params( old_fields => \@fields );
print $tmpl->output;

<tmpl_loop name='old_fields'>
  <input type='text' name='<tmpl_var fname>' value='<tmpl_var fvalue>'
</tmpl_loop>