#!/usr/bin/perl use strict; use CGI; use CGI::Carp qw( fatalsToBrowser ); my $cgi = new CGI(); my $url = $cgi->url(); my $testdata = ""; print "Content-type: text/html\n\n"; print "\n"; print "
\n"; print " This script accepts input in the 'Input' area, then passes\n"; print " that input exactly as entered to the value fields of\n"; print " the different HTML elements. To use the script:\n"; print "