print start_form(), table(
    Tr(
        td("Name: "),
        td(
            textfield(
                -name => 'name',
                -default =>"$edituser",
                -size => 40
            )
        )
    ),
    Tr(
        td("Address 1: "),
        td(
            textfield(
                -name => 'add1',
                -default =>"$add1",
                -size => 40
            )
        )
    ),
    Tr(
        td("Address 2: "),
        td(
            textfield(
                -name => 'add2',
                -default =>"$add2",
                -size => 40
            )
        )
    ),
    Tr(
        td("City/State: "),
        td(
            textfield(
                -name => 'city',
                -default =>"$city",
                -size => 40
            )
        )
    ),
    Tr(
        td("Zip: "),
        td(
            textfield(
                -name => 'zip',
                -default =>"$zip",
                -size => 40
            )
        )
    ),
    Tr(
        td("Country: "),
        td(
            textfield(
                -name => 'country',
                -default =>"$country",
                -size => 40
            )
        )
    ),
    Tr( td(), td(submit('update')) ),
  ),
  end_form(),;