$labels{'1'} = 'Whole Genome';
$labels{'2'} = 'Whole Genome with MIPS Subsets';
$labels{'3'} = 'Specify a MIPS Subset';  #I need a scrollbox here
$labels{'4'} = 'Custom Gene Subset'; # I need a textfield here.

print $cgi->radiogroup(-name=>'sets', -values=>['1', '2', '3', '4'], -default=>['1'], -labels=>\%labels);