Select Code to Download

print $q->checkbox_group (
    -name=>'predefined',
...
    -default=>[ @predefined[@slicer] ],
    -labels=>\%predefined_labelhash,
    );

#!/usr/bin/perl -w
use strict;
...
<input type="checkbox" name="predefined" value="abba" />pop<br /><inpu
+t type="checkbox" name="predefined" value="dabba" checked="checked" /
+>amateur<br /><input type="checkbox" name="predefined" value="doo" />
+don&#39;t go there<br />
$
=cut