my $pay = $q->param(payment=>"discover","master","check"); #### my $pay = $q->param('payment');