如何从Perl中的下拉框中获取选定的值CGI

Question

我正在填充数据库的下拉菜单。当我提交表单时，我在选定的选项中获得了空字符串。这里是我的代码任何帮助将不胜感激。我选择了第一个选项作为默认的任何帮助。

print "<br>Name: <select>"; 
while (my ($name) = fetchrow_array()) { 
    if ($name eq "Somethinge") { 
     print "<option value=\"$name\" selected>" . $name . "</option>\n"; 
    }else { 
     print "<option value=\"$name\">" . $name . "</option>\n"; 
     } 
} 
print "</select>"; 

我正在使用下面的值，但是它返回的值是空的，无论我选择什么。

my $Name = param('name'); 

Answer 1

您在选择标签中缺少name="client_name"。

您可能应该逃避value属性中的客户端名称（尽管对于United Dynacare来说不是必需的）。使用库来生成您的HTML（例如，CGI）将有助于这两件事情。