Put some text here and here and here then run my and see what happens.

Put some text here and here and here then run my and see what happens.

Here is the source:

Write "Content-type: text/plain;charset=us-ascii".
Write CarriageReturn, Linefeed, CarriageReturn, Linefeed.
Set RequestMethod to GetEnvironmentVariableValue("REQUEST_METHOD").
Writeline "** Request method is ", RequestMethod.
If RequestMethod = "GET" then
  (
  Writeline "Good! I can do GET.".
  Writeline "** Query string is ",
            GetEnvironmentVariableValue("QUERY_STRING").
  )
else
  (
  Writeline "Content length (string) = ",
            GetEnvironmentVariableValue("CONTENT_LENGTH").
  Writeline "Number of bytes actually read = ",
            GetUndecodedCGIDataSize().
  Writeline "Encoded form contents (from stdin) are: ".
  Writeline GetUndecodedCGIData().
  ).
Writeline.
For i from 1 to GetDecodedCGIVariableCount() do
  Writeline "Key=[",
            GetDecodedCGIVariableName(i),
            "] val=[",
            GetDecodedCGIVariableValue(i),
            "]".
Writeline.
Set FirstName to GetDecodedCGIVariableValue("firstname").
Set LastName to GetDecodedCGIVariableValue("lastname").
Set FavoriteNumber to GetDecodedCGIVariableValue("favorite number").
Writeline "Howdy, stranger. May I call you '",
          FirstName, " ", LastName, "',".
Writeline "or would you prefer I call you '",
          LastName, ", ", FirstName, "'?".
Writeline "By the way, is your favorite number really ",
          FavoriteNumber, "?".