Select Code to Download

@quantities = ('1','5','10','25','50','100');
my %labels = map { $_ => $_ } @quantities;
...
                 -values  => \@quantities,
                 -labels  => \%labels,
                 -default => $userRecord{$pack_qty});

<select name="foo" >
<option value="1">Individual</option>
...
<option value="50">50</option>
<option value="100">100</option>
</select>