my %hash = (Initiative=>'DriveInitiative',
            ResOrientation => 'DriveResOrient',
            Creativity => 'DriveCreativity',
            ChangeOrientation => 'DriveChangeOrient',
            DecisionMaking => 'DriveDecisionMake',
            SelectLevel => 'ResLevel',
            ManagesPeople => 'ResManage');
my @checked = split /\0/,$cgi->param('drive');
my @clauses;
foreach my $checkbox (@checked) {
   push @clauses, $hash{$checkbox} if validate($checkbox);
}