#! /usr/local/bin/perl use CGI qw(:standard); ################################################### # # CatchForm2.cgi # # Receives data from Form2.cgi # # ################################################### # # Get the parameters $SearchEngine = param("engine"); $Database = param("database"); ################################################### # # Create an HTML document print header(), start_html("CatchForm2.cgi"), hr, h2("Here are your choices!"), "You like $SearchEngine", br, "And you like $Database", hr, end_html;