#!/usr/local/bin/perl

require "/afs/unc/proj/wwwc-f95/lib/cgi-lib.pl";

print &PrintHeader;

 if (&ReadParse(*input)) {
     print &PrintVariables(%input);
      } else {
        print '<form><input type="submit">Data: <input name="myfield">';
 }