print start_form;
if ($in{'submit'} eq 'New Entry')
{
print table(
Tr({-valign=>"TOP"},
[
td(["First Name", textfield(-name=>'firstname', -size=>80)]),
td(["Last Name", textfield(-name=>'lastname', -size=>80)])
]));
}
else
{
print table(
Tr({-valign=>"TOP"},
[
td(["First Name", textfield(-name=>'firstname', -size=>80, -value=>$firstname)]),
td(["Last Name", textfield(-name=>'lastname', -size=>80, -value=>$lastname)])
]));