Select Code to Download

<input type="text" name="custtype" value="whatever'>

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