$Address = $field{'Address'} ;
$City = $field{'City'} ;
$State = $field{'State'} ;
$Zip = $field{'Zip'} ;
$Email = $field{'Email'} ;
$Age = $field{'Age'} ;
$Gender = $field{'Gender'} ;
$Race = $field{'Race'} ;
$Smoker = $field{'Smoker'} ;
$EyeColor = $field{'EyeColor'} ;
$HairColor = $field{'HairColor'} ;
$FavMovie = $field{'FavMovie'} ;
$FavActivity = $field{'FavActivity'} ;
$Occupation = $field{'Occupation'} ;
$message = "" ;
$found_err = "" ;
Checks the values for errors
$errmsg = "
Field 'First Name' must be filled in.
\n" ;if ($FirstName eq "") {
$message = $message.$errmsg ;
$found_err = 1 ; }
$errmsg = "
Field 'Last Name' must be filled in.
\n" ;if ($LastName eq "") {