in reply to Re: Re: First Normal Form (was Re: CGI Checkboxes)
in thread CGI Checkboxes
I hate to brute-force it, and not use CGI, which I can do, but I'd rather use CGI. But it's looking grim...
Update: Here's the brute force code that works:
elsif ($type =~ /check/) { my $i=0; print "$english:\n"; (my $values, my $labels) = split (':',$params[0]); my @checks_list = split (';',$values); my @clabels_list = split (';',$labels); foreach(@checks_list) { my $index=index $real_fields{$name},$_; if ($index != -1) { print "$clabels_list[$i]<INPUT TYPE=\"checkbox\" N +AME=\"$name\" VALUE=\"$_\" CHECKED>\n"; } else { print "$clabels_list[$i]<INPUT TYPE=\"checkbox\" N +AME=\"$name\" VALUE=\"$_\">\n"; } $i++; } print $q->br(); }
I'd love it if someone found a way to use the param function of CGI to get this to work!
|
|---|