Select Code to Download

HTML::Template->output() : fatal error in loop output : HTML::Template
+::param()
: attempt to set parameter 'department' with an array ref - parameter 
+is not a T
MPL_LOOP! at C:/xampp/perl/site/lib/HTML/Template.pm line 3068
 at file.pl line 18

<font size="4">Department: </font>
    <ul><li><select name="dept">
...
    </TMPL_LOOP>
    </select></li>
    </ul>

my @department = @{ $xml->{position}->{departments} };

$template->param(DEPT => \@department);
print $template->output();