Help for this page

Select Code to Download


  1. or download this
        $formTemplate = new HTML::Template( filename => $FORM_TMPL_FILE );
    
...
        $formTemplate->param($key => $formparams{"$key"});
    }
    createForm($formTemplate);
  2. or download this
    my @loop_data;
for my $dept (@dept) {
  push(@loop_data, {DEPT => $dept});
}
$template->param(DEPT_LOOP => \@loop_data);
  3. or download this
     my @loop_data;
  foreach my $dept (@dept) {
  push(@loop_data, {DEPT => $dept});
  }