if ($action eq "Update"){
  print $q->start_form(),		
  $q->p("Last Name", textfield(-name  => 'lname1',-value => $lname,)),
  $q->p("First Name", textfield(-name  => 'fname1',-value => $fname)),
  $q->p("Address", textfield(-name  => 'address1',-value => $address)),
  $q->p("Zip", textfield(-name  => 'zip1',-value => $zip)),
  $q->p("Phone", textfield(-name  => 'phone1',-value => $phone)),
  $q->p("Email", textfield(-name  => 'email1',-value => $email)),
  $q->p(submit("Update")),
  $q->end_form();
}