use HTML::FillInForm;
use HTML::Template;
use CGI;
my $query = CGI->new;
my $html = <<__TEMPLATE__;
Program
Abstracts
Exhibits
Registration
__TEMPLATE__
my $fillinformvalues = { typeofinfo => [ 1, 4 ] };
my $form = new HTML::FillInForm;
my $page = $form->fill(
scalarref => \$html,
fdat => $fillinformvalues );
print $page;