# Indicate we are creating a form.
# For this example, everything defaults. We will flesh it out later.
# print $query->startform({-method=>'post'});
print $query->startform({-method=>'get'});
print $query->endform();
# Generate a text box for data entry
# Render it regardless of if we have previously entered text or not.
print $query->h1('Please enter some text');
print $query->textfield({-name=>'TextfieldOne',
-default=>'Enter your text here',
-size=>50,
-maxlength=>100});