我正在编写一个 Perl CGI 脚本。
起初提交按钮是禁用的,当任何一个单选按钮被选中时它应该被启用。每个对应的行(同名)都有一个单选按钮。
我正在编写一个 Perl CGI 脚本。
起初提交按钮是禁用的,当任何一个单选按钮被选中时它应该被启用。每个对应的行(同名)都有一个单选按钮。
这更可能是一个JavaScript问题,除非您想在启用提交按钮的情况下重新加载页面。但是您可以在 CGI 中指定JavaScript 事件。
对于广播组来说,这只是有点棘手。由于radio_group
sub 允许每个项目的属性,您只需为每个选择指定相同的事件。
my @values = qw<eenie meenie minie>;
my $enableSubmit
= { -onClick => q[document.getElementById('mySubmitButton').disabled = false;] }
;
print CGI->radio_group(
-name => 'group_name'
, -values => \@values
, -default => 'meenie'
, -linebreak => 'true'
, -labels => { map { $_ => ucfirst } @values }
, -attributes => { map { $_ => $enableSubmit } @values }
);