Select Code to Download

#!/usr/bin/perl -wT

...
                  -values=>[$hash_ref]);

print $cgi->end_form;

<form method="post" action="/cgi-bin/addlocation.pl" enctype="multipar
+t/form-data">
$VAR1 = {
...
<select name="menu_name" tabindex="1">
<option value="HASH(0xa278214)">HASH(0xa278214)</option>
</select><div></div></form>