#!/usr/bin/perl

use CGI ':standard';

if (param()) {
 print "Content-type: text/plain\n\n", CGI::query_string(), "\n";
} else {
  print "Content-type: text/html\n\n";
  print "<form method=POST action='http://www.plover.com/~mjd/misc/perl/post.cgi'>\n";
  print "<input name='foo'><input type=submit>\n</form>\n";
}