<form action="/cgi-bin/baseportal.pl?htx=/...." method="post" enctype="multipart/form-data">
<input type=hidden name="db=" value="db">
<input type=hidden name="cmd=" value="search">
<input type=hidden name="Location=" value="$Location">

<loop db=db code=perl>

out <<EOF;
<option value='$Location'>$Location</option>
EOF
$t = $Location;
}
out <<EOF;
EOF
</loop>
</select>
<input type="submit" value="click">
</form>