print $q->checkbox_group
      (
        -name=>'predefined',
        -values=>@predefined,
      );

##</code><code>##

<input type="text" name="something"  size="15" maxlength="15" />
<input type="checkbox" name="predefined" value="a line of text." />a line of text
<input type="submit" name="submit" value="Preview" />
<input type="hidden" name=".cgifields" value="predefined" />