#!perl # This script displays a personalized poem in HTML. # We'll need have the "cgi-lib.pl" file installed in order to # use this script: require "cgi-lib.pl"; # This is one of the routines in "cgi-lib.pl"; it converts the # form data into something Perl can understand: &ReadParse; # Print the HTTP header, followed by an empty line: print "Content-type: text/html\n\n"; # Print the HTML source: print <

This Week's Poem

Here's your poem, $in{'yourname'}:

Thirty days have September, April, June, and November.
All the rest have peanut butter,
Except for Grandma; she rides a bicycle. ENDOFTEXT