Beefy Boxes and Bandwidth Generously Provided by pair Networks
Don't ask to ask, just ask
 
PerlMonks  

Re: Converting large numbers of checkboxes to small number of params

by saintbrie (Scribe)
on Jul 09, 2003 at 20:53 UTC ( #272826=note: print w/replies, xml ) Need Help??


in reply to Converting large numbers of checkboxes to small number of params

Sticking with #3 above. (this is untested code... it probably won't compile, but you get the idea).
my @days = qw( Monday Tuesday Wednesday Thursday Friday Saturday Sunda +y ); my @hours = (7..21); # use the start hour for the value; my $out = qq(<tr> <td>Day</td>); for my $hour (@hours) { $out .= "<td>$hour - " . $hour + 1 . "</td>"; for my $day (@days) { $out .= qq( <tr> <td>$day</td>); for my $hour (@hours) { $out .= qq(<td><input type="checkbox" name="$day" value="$hour" />< +/td>); } $out .= qq(</tr>); } # so now you've printed out the form; # now to get the data out of it: use CGI; my $q = CGI->new; for my $day (@days) { @hours = $q->param($day); # the hours for the day are now in the array. $Hours->{$day} = \@hours; }
  • Comment on Re: Converting large numbers of checkboxes to small number of params
  • Download Code

Log In?
Username:
Password:

What's my password?
Create A New User
Domain Nodelet?
Node Status?
node history
Node Type: note [id://272826]
help
Chatterbox?
and the web crawler heard nothing...

How do I use this? | Other CB clients
Other Users?
Others musing on the Monastery: (9)
As of 2022-12-05 21:16 GMT
Sections?
Information?
Find Nodes?
Leftovers?
    Voting Booth?

    No recent polls found

    Notices?