my @cb = param('disp');
foreach my $cb (@cb) {
   print "You picked $cb.<br>\n";
}