Select Code to Download

<INPUT TYPE='HIDDEN' NAME='g_emplid' VALUE='<TMPL_VAR NAME="g_emplid">
+'>
<INPUT TYPE='HIDDEN' NAME='g_oprid' VALUE='<TMPL_VAR NAME="g_oprid">'>
...
<INPUT TYPE='HIDDEN' NAME='g_projects' VALUE='<TMPL_VAR NAME="g_projec
+ts2">'>
<INPUT TYPE='HIDDEN' NAME='g_projects_valid' VALUE='<TMPL_VAR NAME="g_
+projects_valid">'>
<INPUT TYPE='HIDDEN' NAME='g_projects_valid' VALUE='<TMPL_VAR NAME="g_
+projects_valid">'>

use HTML::Template;
my $h = new HTML::Template(filename=>'output.tmpl');
...
);

print $h->output;