#!/usr/local/bin/perl -w use CGI qw(:cgi); # Include CGI functions use CGI::Carp qw(fatalsToBrowser); # Send error messages to browser # # First take the value entered into the text field and put it into a variable. # $who = param("myname"); # # Then generate an HTML page which prints the contents of the variable. # print < Hello

Hello

Hello, your name is $who.

END_of_HTML