print 	$q->header(-type=>'text/html'),
	$q->start_html(	-title=>'User Setup',
			-bgcolor=>'#ffffff',
			-onLoad=>'Javascript:document.houst.userid.select()'),
	$q->start_form( -name=>'houst',
			-method=>'post',
			-action=>$me),
	$q->table( {	-align=>'center',
			-border=>0,
			-width=>400,
			-cellspacing=>10 },
			$q->Tr( [
				$q->td( { -align=>'center'},
					[ $q->font({-face=>'arial', -size=>'+2'}, $q->b('User Setup'))]),
				$q->td( { -align=>'center'}, [ $q->hr]),
				$q->td( [ $q->textfield(-name=>'userid', -size=>'42', -default=>'') ]),
				$q->td( [ $q->popup_menu(-name	=>'server_instance',
							-values =>['cash_fidev','cash_sbltest'], 			# this is the actual argument passed to the server
							-labels	=>{cash_fidev => 'Dev', cash_sbltest => 'Test'}) ]),	# this is the corisponding label on the webpage
				$q->td( [ $q->submit (-value=>'Submit') . ' ' . $q->reset ] ), # here's where I changed the concantation.
				$q->td( [ $q->font ({-face=>'arial', -size=>'+1'}, $q->b('Output:'))]),
				$q->td( { -bgcolor=>'#cccccc' }, [ "display" ]),

			])
		),
	$q->end_form,
	$q->end_html;