#!/usr/bin/perl
#
use CGI;

$page = new CGI;
my $in;
  if ($ENV{'REQUEST_METHOD'} eq "GET") {
      $in = $ENV{'QUERY_STRING'};
  } else {
      $in = <STDIN>;
  }

  @Texts = ("text1","text2","text3","text4","text5");

print $page->header(); # This outputs the Content-Type stuff
print $page->start_html();
print $page->startform;
print <<ENDhdr;
.....
.....
ENDhdr
print $page->endform();
print $page->end_html();