# Generate a password area
# Render it regardless of if we have previously entered text or not.
print $query->h1('Please enter some secret text');
print $query->password_field({-name=>'PasswordareaOne',
-default=>'Your Password',
-size=>10,
-maxlength=>60});
# Extract out whatever the contents of our password area were.
my $textInput = $query->param(-name=>'PasswordareaOne');
print $query->hr();
print $query->p('The Password entered was:'), $query->br();
print $query->em({-align=>'center'}, $textInput);
print $query->hr();