my $q = CGI->new(); my $cust = $q->param('custtype');