my $tmp = $,; $, = "
\n"; print $q->checkbox_group ( -name=>'predefined', -values=>@predefined, -defaults=>param('predefined'), ), $q->submit(-name=>'submit', -value=>'preview'), $q->end_form; $, = $tmp; # return output field separator to it's original value.