my $html = &get_html();
my $pop = new Form::Populator;

if (! $cgi->param('validate') )
{
   my $new_html = $pop->populate(
      computers => qw/ abra cada bra /,
      staff => qw/ alice bob chris /
   )
}

# $html now contains a nice bit of HTML that has had
# values added to the list boxes with name "computers"
# and "staff".