CGI Forms   «Prev 

How Web forms work in Perl

formtest.html

<html>   <!-- Here's a nice place for a comment -->
<head>
<title>My First Form</title>
</head>
<body>

<center>

<h1>My First Form</h1>

<form method=GET action=formtest.cgi>

   <!-- This form is for: blah blah blah blah -->

<table>  <!-- Tables make the world go 'round -->
  <tr><td colspan=3><hr noshade size=2>
  <tr><td valign=top>
    <p>Somebody's Name:
    <br><input type=text name=name>

    <p>Somebody else's age:
    <br>  <input type=radio name=age value="0_6"> 0 to 6   
    <br>  <input type=radio name=age value="7_18"> 7 to 18  
    <br>  <input type=radio name=age value="19_21"> 19 to 21
    <br>  <input type=radio name=age value="22_39"> 22 to 39
    <br>  <input type=radio name=age value="Over the hill"> over the hill

    <p>Is somebody listening?
    <br>  <input type=checkbox name=listening> Yes, they are!
    <br>  <input type=checkbox name=blue> Your face is blue

Perl CGI Scripting
<td width=10%>
<td valign=top>
    <p>This form is:
    <br><select name=formis>
      <option>Cryptic
      <option selected>Educational
      <option>Amusing
      <option>Ridiculous
      <option>Mauve
    </select>
    
    <p>This form is also:
    <br><select name=formalso size=4>
      <option>Superflouous
      <option selected>Redundant
      <option>Overloaded
      <option>Plethoric
      <option>Indigo
    </select>

    <input type=hidden name=info value="NRP 1-56205-571-2">

  <tr><td colspan=3><hr noshade size=2>
  <tr>
    <td>
      <p><input type=submit value=" Wow! I'm Done! ">
    <td>
    <td>
      <p><input type=reset value=" Foo! Start over. ">

  </table>
</form>

</center>

</body>
</html>